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NEXT 
COPY ( 
FOR CX 
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READ 
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210 FOR 
220 LI 
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230 NEXT 
240 NEXT:N 
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IF S T 
GOTO 



12,0:COLOR 
1 )/3:DIM A% 
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100 SCREEN 0:COLOR 15.4.7:WIDTH 40:KEYOF 
F:DEFINT A-Z 



110 IF INKEY$>' 
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120 



120 PRINT USING"R:## >>>";R; 

130 INPUT R:IF R>31 OR R<0 THEN 

140 PRINT USING"G:## >>>";G; 

150 INPUT G:IF G>31 OR G<0 THEN 140 

160 PRINT USING"B:## >>>";B; 

170 INPUT B:IF B>31 OR B< THEN 160 

180 Y=(B+R/2+G/4+1 )¥2:J=R-Y:K=G-Y 

190 PRINT 

200 PRINT USING"R=### G=### B=###";R;G;B 

210 PRINT USING"Y=### J=### K=###";Y;J;K 

220 A$=RIGHT$("00000"+BIN$(J) .6)+RIGHT$( 

"00000"+BIN$(K) .6) 

230 FOR 1=0 TO 3 

240 PRINT USING"&&=& & " ; MID$ ( " KLKH JL J 

H". 1*2+1 .2) ;"&B"+MID$(A$.10-I*3.3) ; 

250 NEXT 

260 IF STRIG(0) THEN 280 ELSE 260 
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310 NEXT:NEXT 

320 BEEP:BEEP:BEEP 

330 IF STRIG(0) THEN 100 ELSE 330 
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LUh4IJ, J, Kf-55 
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IS ~ T 


MORE? (HIT SPACE KEV) 




100 SCREEN 12.0:COLOR , 
CREEN>0:CLS:KEY1 ."GOTO 
110 OPEN "GRP:" AS #1 
120 DEFINT A-Z:DIM R(20 
130 FOR Y=31 TO STEP 
140 C=Y*8 

150 LINE (31-Y.31-Y)- 
+1 )*2-1 ) >C.BF.PSET 
160 NEXT 

170 COPY (0.0)-(63>63) 
180 FOR CX=0 TO 3:X=CX* 
190 FOR CY=0 TO 2:Y=CY 
200 COPY R TO (X,Y) . . 
210 J=INT(RND(1 )*64)- 
220 K=INT(RND(1 )*64)- 
230 A$=RIGHT$("00000" 
$C00000" + BIN$(K) ,6) 
240 FOR N=0 TO 15:F0R 
250 LINE (X+N*4+M.Y 
"&B"+MID$(A$.10-M*3>3) ) 
260 NEXT:NEXT 
270 COLOR 7:PSET(X+2. 
T#1 >USING"### ###";J,K 
280 NEXT 

290 LINE (X.0)-(X.Y+63 
300 NEXT 

310 PSET(50.200) .0.TPSE 
#1 ."MORE? (HIT SPACE K 
320 IF STRIG(0) THEN 18 
330 '••• SAVING SCREEN 
340 SCREEN 0:COLOR 15.0 
;F$:SCREEN 12:SETPAGE 1 
,8)+" .SCQ" .0.&HD3FF.S 



0.0.-SETPAGE 1 .1 :S 
370"+CHR$(13) 

50) 
-1 

STEP( (Y+1 )*2-1 . (Y 



TO R:CLS 

64 

*64+CY 

PSET 

32 

32 

+BIN$(J) .6)+RIGHT 

M=0 TO 3 
)-STEP(0.63) .VAL( 
. .OR 

Y+54) >0.TAND:PRIN 



,7. .AND 

T:COLOR 255:PRINT 

EY)" 

ELSE 320 

:INPUT"FILE NAME" 
.1 :BSAVE LEFT$(F$ 



100 SCREEN 0:WIDTH 40:COLOR 15>4.7:KEYOF 

F:DEFINT A-Z 

110 IF INKEY$>"" THEN 110 

120 INPUT "J.K";J.K 

130 IF J<-32 OR J>31 OR K<-32 OR K>31 TH 

EN 120 

140 A$=RIGHT$(" 00000 "+BIN$(J) .6)+RIGHT$( 

"00000"+BIN$(K).6) 

150 SCREEN 12.0:COLOR .0>0:CLS 

160 FOR N=0 TO 63 

170 FOR M=0 TO 3 

180 LINE (N*4+M.0)-STEP(0.21 1 ) .VAL(" 

&B"+MID$(A$. 10-M*3>3) ) . .OR 

190 NEXT 

200 NEXT 

210 FOR X=0 TO 127 

220 LINE (X.0)-STEP(0. 105) . (X¥4)*8> -OR 

230 NEXT 

240 FOR X=128 TO 255 

250 LINE (X.0)-STEP(255-X.255-X) . ( (X-1 

28)¥4)*8. -OR 

260 NEXT 

270 FOR X=255 TO STEP -1 

280 LINE (X, 107)-(255.21 1 ) .7. .AND 

290 LINE (X.107)-(255.211 ) . (X¥8)*8. -OR 

300 NEXT 

310 BEEP:BEEP:BEEP 

320 IF STRIGC0) THEN 100 ELSE 320 
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5 ON INTERVAL=10 GOSUB100 

15 INTERVAL ON 

100 IF PLAV<0> THEN RETURN^ , _ 

110 IF Z=17 THEN Z=l ELSE 2=Z+1 

120 A$=M ID* < " CDERCDERGEDCDEDR " , Z, 1> , 

130 PLAV"V15O5T150S9M300O"+A$: RETURN 
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1 SCREEN 1 .1 : COLOR 15.1 : DEFINTA-Z : FORI =8T01 6 : SPRITE J ( I I =MIDS I " 
i-Tn»3qT»UZ*<f 7i<".l»l ■ 1 ): NEXT: FORI =BTOieB:0=RND(l 1.6:FORJ=0 
T027-S=STICKiai :PUTSPRITEB. 1124. J »75) . 1 2 . : PUTSPRITE1 . (124.1 
29- J i . 12.S*8:FORK=BTO50-I:NEXTK. J : I FQ=S- 1 THENNEXTELSEPR1NT I : 
POKE-869.1 :RUN 
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202 IF L>27 THEN 130 

203 FOR 1=0 TO 6:C< I )=0:NEXT:D=0 

204 B=0:FOR 1=0 TO 6:IF C(I) THEN 207 

205 C=0:FOR J=0 TO 6:IF D(I.J)>0 AND C(J 
)<1 THEN C=C+1:IF C>1 THEN J=9 

206 NEXT:IF J<9 THEN C(I)=1:B=B+1 

207 NEXT:IF B< 1 THEN 180 

208 D=D+B:IF D<7 THEN 204 
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10 SCREEN 5: COLOR 1,15,15:CLS 
28 CIRCLE <128,96>,30, 4 
30 CIRCLE <128,96>,50, 1 
40 CIRCLE <128.96>,70, 8 
100 IF STRIG<C0>=0 THEN 10© 
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50 PAINT (128, 96), 4, 4 



58 PAINT <128,96>,10, 4 



50 PAINT <128,96>, 4, 8 
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10 COLOR15.0.0:SCREEN0:WIDTH40:PRINT"COU 
RSE :"; :FORCV=0TO1 :CV=VAL ( INPUTS ( 1 ) ) :NEX 
T:SCREEN5.1 : SPRITES ( )="< BB2D~"+CHR$ (0 ) + 
"f":0PEN"GRP:"AS#1 : A = RND( -CV) *0 
20 LINE (87.65) -(168. 146) .3, B : PAINT ( 88 . 66 
) ,7.3: LINE (88. 146) -(167. 146) .14: LINE (87. 
65)-(168.65) .0 

30 COPY ( 88+A.67) -(167+A.1 46 )T0( 88.66) :A= 
A+INT(RND(1 )*3)-1 : LINE ( 1 26 , 1 46 ) - ( 1 29 , 1 46 
) , 14+(SC¥8AND1 ) : IFABS(A) >4THENA=SGN ( A ) *4 
40 SC=SC+1 :S=STICK(0) :G=G+ ( S=7 ) - (S=3) :X= 
X + G-A:PUTSPRITE0. ( X+1 28 . 1 20 ) . 9 . : IF POINT 
(X + 130.135X7ORPOINT(X + 141 . 1 35 X 7THENPRE 
SET(84.20):PRINT#1 ."GAME OVER":GOTO60 
50 IFSC>499ANDSC<51 1THENV=SC¥2-250 : LINE ( 
87-V.66)-(87-V.146) .4:LINE(V+167.66)-(V+ 
167.146) ,4:GOTO30ELSEIFSC=520THENPRESET( 
84.20) :PRINT#1 ."CLEAR ! !": PRESET ( 84 . 28 ) : 
PRINT#1."G0 NEXT COURSE" : SC= 1 000ELSE30 
60 PRESET (84. 36 ) :PRINT#1 ."SCORE" ;SC:FORA 
=0TO1 :A=-STRIG(0) : NEXT: RUN 

SILVER SNA I LfW r PEGU I N G S jMBfflttl 6 tt, vJ^TiBS^K^foT. ^*'>?>;&hi:>#< Z(D?-Uimibhl*>l>t!g~ 





In a forest j 0)7&n—)WO-yO 



3. ? P -)\>-fimt, r THl'J^7 
*©x U t' 7J > 7-TJio fc t 1 1- 
tzhlfr±th\ r ^42tt|6]*^^ 
8r0ttVC*fc«b, fcX&jfcjS**' 

J*?p-n-li s COPYS?^ 
JWUfst-? T9H1 L T U 5 <7)7Y#\ 
i^fcuffflii fcttffl* left o 



nTtrnzf-Lmmw 

COPYt^M6-3/ix^a- 
rt'Ttt, TD^S-li^tf)^— XCft 
fi)cLTfc#, 'r-A'K ^LfO 
-f b L tt# b*££ L T < 5 - 1 f 

«sritro*'^ot ztiu. 

a-s<JV<?\)-fiZtiti\:ti a 

l**U :fflyD^7Attt, 
%i.r>tm^-%tbb-%-h\ ISA* 

J:7fcif£*8ii*Ti.*5gB7}S;L& 
fMOTSKKili® l-fl* L X i * S 



^-Ailft*^ 7 p -;i-c7)7c*£ 

<7)<£lZC0PYtZ-tX\ *■? 

>Ki, x?Q-n-<7>Siilfc|5]B# 
KU -^Hlx^p-;K7)t#(7)7n^ 

tz{xtn -;K7M±fflA#SB) 

/;'A N b, •£mtit£X?n->uJ> 
Wilis ff30(-*>5/iT/c 1 OCT) 
COP YlSMf/i'tf-tlTfrft.T^S 



ii®**OTT«)S87>roa*s*s a 
#s(7)t\ ^e-ciamM4-x*t 

it^^tz^lc (MORO) 




10 COLOR15,0,0:SCREEN0:WIDTH40:PRINT"COU 

RSE :" ; :FORCV = 0TO1 :CV=VAL( INPUTS ( 1 ) ) :NEX 

T: SCREEN 5. 1 : A = RND ( -CV ) *0 

20 LINE (87,65)- (168. 146) > 3 > B : PAINT ( 88 , 66 

) .7.3: LINE (88. 146) -(167. 146) .14: LINE (87, 

65)-(168.65) .0 

30 COPY (88+ A, 67) -( 167+ A. 1 46 ) TO ( 88 . 66 ) : A= 

A+INT(RND(1 )*3)-1 : LINE ( 126, 146) -(129, 146 

) , 14+(SC¥8AND1 ) : IFABS(A) >4THENA=SGN ( A ) *4 

40 SC=SC+1 

50 IFSC>499ANDSC<51 1 THEN V = SC¥2-250 : LINE ( 
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1 SCREEN1 ,3.0:KEYOFF:SPRITE$(0)="->P-Ms$m 
n\97*o6l\-b" : SPRITES ( 2) »"* ZZ*o , *>68fr-»Z :n" 
:SPRITE$(1 )="6<fc<:7EaBBBy-fA7i>E": COLOR 15. 
1 .1 :WIDTH32:E$=CHR$(27)+"Y" 

2 CLS:VPOKE&H2005> (L+2+(L>8) )*16+(L+2+(L 
>8)) :XT=50-L*15*(L=<10) : PRINTE$"#+LEVEL" 
;L:Y=0:P=0:XX=0:X2=0:X0=XT-50:D=0:PRINTE 
$"2 "+STRING$(64,"/") 

3 IFY=0THENSOUND7,7:SOUND6.0:SOUND8.15:S 
OUND8.0:IFSTICK(0)THENP=8 

4 IFYO0ORP>0THENY = Y + P:P = P-1 

5 XX=-STRIG(0)*1-1/2+XX-(XX<0) :X1=XX-6:X 
T=XT-X1 :X2=X2-XX-1 :X0=X0-X1 : IFX2<0THENX2 
=252ELSEIFX2>252THENX2=0 

6 D=D+XX*2+2:PRINTE$" !+i*T ; D : F=2-F : PUTS 
PRITE0. (50.123-Y) , 1 0-B . F : PUTSPRITE2 . (XT. 
113) .U.F:PUTSPRITE1 . (X2 . 1 27) . 1 5 : IFX2<65 
ANDX2>45ANDY<30THEN8ELSEIFXX>11THEN8 

7 B=0: IFD>3000THENA=-(X0<0) : PRINTE$"#+"M 
ID$("Sft$+-3fc*!t)-u;Hfe! !",A*8+1 .8) :BEEP:PLA 
Y"V15L3206CDECFG" : FORI=0TO999 : NEXT : IFATH 
ENL=L+1 :G0T02ELSE2ELSE3 
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150 =]7*©Yffitlif»M 
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: COLOR* 



IB '••• CHASE! J-J°9<K by NU 

20 SCREEN5.1:DEFINTA-Z:OPEN"GRP: 

30 FORI=0TO4:COLOR=(5+I. 1+3.1 .1 ) 

10+1, 1+3. 1+3. 1):NEXT 

4B SPRITE$(0)="R!'t<')P , )":SPRITE$(1)="8 " 

U')P , r:FORI = 0TO9:A$ = '"':FORJ = 0TO7:A$ = A$ + C 

HR$(RND(1)«256):SPRITE$(I+2)=A$:NEXTJ.I 

5B FORI=BT01 :A$="" : RESTORE : FORJ=0TO7 : RE A 

DA:AS=A$+CHR$(A+I»5) : NEXT :C0LORSPRITE$ ( I 

) = A$ : NEXT : 0ATA9 .5.9.9.8.6.5.6 

6B SETPAGE.l :COLOR1 .2.1 :CLS 

7B LINE (B.B)-(64. 144) . 4 . BF : FORI =0TO7 :CIR 

CLE 1 1 5. 1 » 18 + 9) .15.2. . . . 5 : PAINTSTEP ( -9 . -3 

).2:PRINT#1.I+1 :NEXT 

8B ■••• STAGE 

9B SETPAGE.B:C0L0R15.4 

IBB SETSCROLLB. .1 :CLS : FORI=BT09 :C=RND( 1 ) 

•1 92+32 :D=RND(1 ) «32 : CIRCLE (C . D) .32-D¥2. . 

. . .5:PAINT(C.D) :NEXT:R=R-(R<8) :PSET(32.1 

86) :PRINT#1."^A,k»":R:T = 336-R#2B:BEEP 

11B A=232:B=195:F=1:P=B:S=B:V=0:W=0:X=0: 

Y=B:GOSUB190:ONSPRITEGOSUB250:SPRITEON 



12B IFSTRIG(0)=0THEN120 

13B GOSUB24B:K=124:S0UND7.46:SOUND8.15:S 

0UN09. 16:SOUND12.B:SOUND13. 14 

140 >••• LOOP 

150 W=W+1+(STRIG(0) )*2:B=B+(SGN(Y-B)) :GO 

SUB190:IFY<0ORY>196THENGOSUB250 

16B IFPOINTI (X+128)AND25 5.Y+7)=2THENSOUN 

D0.32:S=S+18:GOSUB220 

170 SOUNDB.B:SOUND11 .64+W :GOT01 50 

18B '••• SUB 

190 Y=Y+U:PUTSPRITE0. (124.Y) . .P 

200 V=V+SGN(K-A) :A=A+V*2:PUTSPRITE1 . (AAN 

D255.B) ..P:P=1-P 

210 X=CX-7-R)AND255:SETSCR0LLX: RETURN 

220 INTERVALOFF:K=RND(1)»60+90:IFFTHENSO 

UND0.255:M=X*.8:N=B*.6+48:F=0ELSEF=1 

230 COPY (F«32.S) -STEP (31 .171.1 TO. M.N): IF 

S=144THENRETURN100 

240 ONINTERVAL=T-S+RND(1)»20GOSUB220:INT 

ERVALON:RETURN 

250 SPRITEOFF:INTERVALOFF:BEEP:FORI=0TO1 

:GOSUB19B:W=W+1 :I=-(Y>195) :NEXT 

260 FORI=0TO9:PUTSPRITE0. ( 124 . 195) . . I +2: 

GOSUB200 : BEEP : NEXT : FOR I =48T0 185: LINE (0.1 

W255.I) .4:NEXT:RETURN110 



mum u /a y*.tiwm(D± 

iB0 ^yxtmrntmu-i 
fc7j^ys =>■& o z ima+ 

m/®mm$\yy(fflwm 
umu 

170 tHHs+f y^gl*/ 
H^*OYiSS«»Cd:5R 

180 REM£ 

190~£10 X^^YSSS/7. 

ya-nyy 
190 z\yx(DYmmm.m/ 

eoo mcDxmm^ft.xmm 

mn/WM.^/yyz>-i >© 

mifjw-ywo&z-mtiv 

yymft 

pio yya-^mmw^ 

££o~£30 mmmnyy 
££0 -iyy-nsimozfr 

s - m mmmm^ ®im 

m/mmy^yms. ®m 
^UBwrny^ym'S. 
£30 mmy^yiz&omm 
5tz\m£/y<J7m&<y 

£40 ■lyZ-JVimOZ.frfi 
£50~£60 U7UY 

£50 yy^-iwmm^yy 

£60 Zl^'Jtfgx^/^fl 
g/lfSlS/fillO^tc!:' 
5 



*i£ 



SstDXsl^cT)©! 






54 



«^S» 



T%«sS(* 1 ^' , J-'»-T^'i»l'j:<7)A-4-t-e.oTLi^*'r„ J s-^' , J:'L•ffi^J^.^b'J.'s~t ^ *U^lJBSnfc•/jT•»s^'t: <?;?(.>„ «.i->tB«'i'l*6Ln4 



ZCDf-hZlt. M(Dxmm& 

smoMmt&mmmzmmts 

itt&tDtzo ±famzi££5-D 






SETS 



s 1 



57-f^ d:©®?S¥!]££f 5 




ti£&<!flS^160©PO I NT 
pp^©»^©X^#©d;5lc, 
I3^3<ftgtf353©r;±SU 
«fc5. (MORO) 



^©^Spro^/^M^siy^^ 

fcbrUSSETSCROLL 
ifrStt, MSXE+l-mfflSS 

«a&;&[l©££'3/ctf\ ;£ 
JiLriSUlKDB. 2^7-fy 

f^-^zbfrmxti^ztt. 



SET SCROLL x. y. m. J 



[ x Mfift<D7.2a-)im] mm 

§ebb o~5ii?, ^bBl>AmuX'<■- 

BXTcM SM^B»KU&U„ 
SCREEN6t7rB2H:'7Sm 

[y «(75rs)©7.-?p-Ji/M]s^ 

(EBB frto255oSfX^D-JbBM 

sxb©a-soi72.?p-;u<=- 

fi&lK, 3.7tM MSSStX? 



P-JUZtfe&l^KtSo 

[m gfSUffiSlOfrirfflKo 

1 ffltSIJ, HS«5BBf;B 

lB)K'7K/3^B12S?B"3"o 

I J ^-S/'SSl 1- 1 ?*iSo 

bH^-: yaScrSX^P-Jl/fSo 
5/cfffltSfflXB, 0-255B1S 
SK-y, 256-51 IBSSS^-y© 



OWER OF CAN 



CE3CS12/2+RAM8K by KPC 



W— xy-fiy 



*&W5lt3B1-Z? 



^P^Zx*?!* 



x?5-rhffli ®«i»Hffi 



x, y a3©nf? 



X(n) ®/vr£3£©XJl 

E(n) mm^mtxmm 

F(n) lif^grTYMi 

z ii£i£arr*§©i!^)Sif 

a mnn 

A$ iijnfcBf©X'>tz-v 

c s©?s 

C(n) ffifflfe 

I N J JU-^ffl 

K 1i?4 

l £©e 



VtZt 



3.7t3Y StMXt£:£»S5©3. 



•Ji/-7©nfe, 3o©s©S) 



blS'^r4 / \) 

(S)ffltl3#0«S 

•gijn-§7r-©¥iJ£(m^£9 

(S)ffiSlJiF 

•iiS;li£»£5©x^ n-JUD 
fcfc©^^*^-?©!!^ 
3.^n-JUi£©£g|#^ JU-7 1 



•R3^ 






>£2$©*7JJ£fli«fT6'\ 



0) «Q]SIRS 

•a5©stiJQ«s©ffi#iss» 

m^tzfrmmm^zui^ti 



*PiSSi;*#V 



f>otA, SiBPLEASEo J:*^tbS»ri: 

■CM77VE^^© r < 6Va*©ttUjT«BfcL/ 
/Ti;: r yp?'t5?d;00-<!:;:<=.j?£o£§<«U 
tajeff „ &t?MslV s^^-^o *M 

77>4Sf© r bW , AitiA)Xtl'A-jO 
KUWA2/uo «©Fl-XDJBiES?^»US1- 

?m^©Buoc«5^/<f^„ 

KPC lWt-14* 




T0WERCAN.FD6 

1 COLOR15.0.0:SCREEN2.3:SPRITE$(0)=STRIN 
G$( 1 5,255) : DIME (40) »F (40) : FORI=20TO40 : A= 
I*2.826/18:E(I)=C0S(A) :F(I)=SIN(A) :NEXT 

2 L = 2:FORI = 0TO2:X(I)=80.:C(I)=RND(1 )*14+2 
:NEXT:C=2:X=80:K=0:Z=160:GOTO6 

3 C=C+1 :X=X(0)+15:Y=5:V=0:W=0 

4 S=STICK(0) :V=V+(S=7)-(S=3) :V=V#(X+V>X( 
0)-15)*(X+V<X(0)+15) :W=W+STRIG(0)*2+1 :X= 
X+V*A:Y=Y+W:A=-(Y>0) : Y = Y+ ( A=0 ) hY : L = RND( 1 
)*14+2:PUTSPRITE0. (X.Y) > L : IFY< 58THEN4 

5 A=X-X(0) : IFABS(C*K*W) >95THENA$=" ry§«u* 
"Jtf 6j":G0T07ELSEK = K + C/5*(A/4) :IFABS(K)> 
6-C/50RABS(A) >8THENA$ = " r #fets****fej" :G0T07 

6 CLS:X(2)=X(1 ):X(1)=X(0):X(0)=X:C(2)=C( 
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+1 , (X(I) .1*32+90) >C(I),0:NEXT:LINE(Z.Z)- 
(Z+E(K+30)*C*2.Z+F(K+30)*C*2) .10:GOTO3 

7 FORI=0TO500:NEXT:SCREEN1 : FORI=1 TOC :S0U 
ND6.31 :SOUND7.0:SOUND8,16:SOUND12>15:SOU 
ND13.1 :A=RND(1 ) *50 : FORJ=0TOA : NEXT J , I : PR I 
NTA$:PRINT"»^(»#t*"C:FORI = 0TO1 :I=-STRIG(0 
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3©PUTSPR I TEB%tf 

tf^ofc©^ jgiEbrfcufc, 
fc0«E&£«brnfcfc«&£, 

37n^A£iH<D£Stt. «v 
oljTSUV (MORO) 






V,'<J=^*±@'N{iaj 



ft, JRffllSNHWvfflA^/i^KUroSAV *o 1 AlU*l3:^3:««& 
t«±ISNHWCnr, ^V^-AfeYM-SOFTIcEfrO. ^Url*££ 

5t?h a Y.M-SOFT SS-15* 




H;SX-SSSS«<*POT>;tSKs).'® r ^-/s--/N> 

atffl*ff<ms«B>±ffl^-<#SJn»>f»tgtts 



HATTAOS .FD6 



1 SCREEN1 .1 :WIDTH20:KEYOFF:COLOR10>1 .1 :F 
ORI=0TO34:VPOKE14340+I.VAL("&H"+MID$("18 
FF3C66183C3C7EBD3C246660C0C0C0C0C0600070 
E0F0E0F0E070007EF8FFF8FFF87E" .1*2+1 .2) ) : 
NEXT:C=1 :E$=CHR$(27) 

2 FORI =0TO250: NEXT : A$="S8M5000L1 6B8BBBD" 
:X=110:PRINTE$"Y!$<tt-3£**f*! ! >" : PRINTE$"Y 
tlL-XSA^SU )": ttOi:"S(0) : IFS (C) =8THEN6E 
LSESOUND7.56:PLAY"03"+A$."02"+A$,"01"+A$ 

3 PUTSPRITE0. (X.80) , 6 . H+2 : IFH=2THEN5ELSE 
ST=STRIG(0) :D=-(D+(D<20)*ST)*ST:C=1-(D<2 
0)*ST: PUTSPRITE1 . (124.86) .7 ,C : H=- (STRIG ( 
1))*2-(STRIG(3)) :IFH=2THEN4ELSE3 

4 FORI=0TO10:X=110+I:PUTSPRITE0. (X.80) .6 
.3:NEXTI:G0T03 

5 S(C)=S(C)+1 :H=0:IFC=1THENSOUND7.0:SOUN 
D8.16:SOUND13.0:SOUND0,250:SOUND1 .120: SO 
UND6.16:C=1 :FORI=0TO14:K=15-I:COLOR.K.K: 
NEXT:GOTO2ELSEPLAY"S12M400O6C16E16D","S1 
203C16E16D":G0T02 

6 S0UND7.8:PLAY"V1305L4G.F8EDC2": PRINTES 
"Y0!": IFS ( 1 ) >S(0)THENPRINT" C*»< S*5U:n *->\t 
0, 9'DiU"ELSEPRINT"U*')><'6j;5(»L*fe vs t>ttNSt3Tfe " 

7 FORI=0TO1 :I = STICK(0) :NEXT:RUN 
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£^¥©fizBi*JW?-(P)ii 
JQ(P©1IA*13«±&&P = 4 
£UrS8CKV 13KT&61t60 

UGL14 P©<1A- r&ttttB: 



Ct)*£-^ 



u<t■^:^^tl:ft«a!Ei|ast'ofc(l;oBl.^sK^1»u#«o■c:L^to■r5)o 
£ss„ ti^-fcyr, :ft#t>t y*m-soft BA^tfosfo «i* 

Y.M-SOFT SK-15SS 




^itg/»ma^^^/p=o 

/^zi^^^/^i-f h/BE 
EPg/^^^-T h ;££/*- 

A. 

(§):7b-ftt7 

h-^Jl/7. =171+8, §h^-f 



7. =1 -Ftmik/K-i-xtt'i y 
o&£©>< af'-f / S U #-A 



U/j>g£±©AFJF*ilCa^ 



SAI 



.FD6 



10 COLOR 1 .15, 6: SCREEN 5.1 : DEFINTA-Z : FORI= 
0TO7:VPOKE30720+I,VAL("&H"+MID$("0C3C707 
C707C703C" .1*2+1 > 2) ) : NEXT : OPEN"GRP : "AS1 
20 SETPAGE0.1 :CLS: CIRCLE (100. 100) .18,1 . . 
,1.11 :DRAW"BM85,119G5D40F5R30E5U40H5L30" 
: PA INK 100. 100), 9.1: PA INK 100. 120), 15,1: 
LINE (80,80) -(120,95) , 7 , BF , AND : DRAWBM90 , 
100R4BM+12,0R4":PAINK0,0) , 7 , 1 :N = 1 : A=180 
30 SETPAGE0.0.-CLS: PAINT (0.0) .7.1 :FORI = 1T 
04:PRESEKA, 30 + 1*20) :PRINT#1 ,USING"T # # 
#";I;S(I) : NEXT: LINE (80, 120) -(176,200) ,14 
, BF: FORI = 0TO20: LINE (80, 120 + 1*4) -(176, 120 
+1*4) ,1 : NEXT: FORI =0TO1 : CIRCLE ( 50 , 30+1*50 
) .30.1 . , , .3: PA I NK5 0,30 + 1*50) .15.1 :NEXT: 
IFN=5THEN90 

40 PRESEKA.20) :PRINT#1 ,USING"HI ##" ; H 
50 FORI=0TO1 :K=RND(1 ) *1 : PRESET ( 38 , 77 ) :P 
RINT#1 , K:I=STICK(0) : NEXT : D=0 : F=-1 : BEEP 
60 COPY(80,70)-(120,150) , 1 TO( 1 34 , 40-D*3) 
,0:FORI=0TOK*50:NEXT:F=F+(D=10)*2-(D=0)* 
2:D = D + F:Y = 104-P*6:PUTSPR.ITE0, (120.Y) ,9,0 
: PRESET (34, 27) : IFSGN ( F ) =1 THENPRINT#1 ,"*<> 
-"ELSEPRINT#1 ."Its-" 

70 IFSTRIG(0)THENP=P+1 : IFP >1 2THENP=4 : GOT 
O80ELSE60ELSEIFP>0THEN80ELSE60 
80 PUTSPRITE0, (120,104) : GOSUB1 1 : S (N ) =P* 
D/6: LINE (128, 121 ) - ( 1 28 , 1 20 + S (N ) *4) ,1 :P = 
:PRESET(A,30+N*20) :PRINT#1 ,USING"T # ##" 
;N;S(N) :FORI=0TO40 00:NEXT:BEEP:PUTSPRITE 
0, (0.216) :B=B-(S(N)=20)*5:N=N+1 :GOTO30 
90 F0RI=1T04:S=S+S(I) : S ( I ) =0 : NEXT : S=S+B 
PRESET (A, 150) :PRINT#1 .USING" BONUS ##";B 
PRESET(A. 160) : PRINT* 1 .USING "TOTAL ##";S 
H=H+(H-S)*(H<S):S=0:B=0:N=1 
100 PLAY"T220S8M10000O4L8CEGB4A1FFFGEEED 
C2":FORI=0TO1 :I=-STRIG(0) :NEXT:GOTO30 
110 S0UND7, 7: SOUND 13,1 : SOUND0 , 20 : S0UND2 
,90:SOUND8,16:SOUND9, 16:S0UND11 ,71 : SOUND 
12, 50: PRESET (34, 27) :PRINT#1 , "2U !": RETURN 
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xy> 
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810-250 ^-ASDI^l 
210-220 Xzi7ffl^S=*ff 
210r,7s=i7tfl000*;I©c!: 
^ISBSCTA-To^s^ft 
SA\!j220r'l^?-roVA 
L("BH"+ )££orn 

§©r\ ^t-xtocas 

230 K'JA'-SStXf^ 

240 Xr-f'^A^/^T 

250 7x-r^A7Jll=^ 
I]75|S]^«!x-:7Jb©fFJS 
260 7.h'>7+-iJOiA^«!i 

270-380 7*-£ 
270-360 Y^YlgT/P^ 
A 

370 n^tfySSt^fflx- 
^ »790rl%*iA*-) 
380 yCb^Nx-^ 



^i/> 



COO0-C01 4 

VDP^-S7SUXffl«*gl 

x(USR0) 

COl 5-C064 

2567^-Vffi^B^VRA 

MSH 1 0000^6«*iAC 

C065-C098 

BC^tTXfeliYISfKx+Tsh 

If)AND7Cf5(USR 

1) 

CO99-C0D8 

?-£«D»Hb(USR8) 

COD9-C0FF 



vtzt 



£*.T3:f#? 



WAYj^ffofcVZr-fo ^>*-AttB13E£5tt— ?JK91*f7E*§# 
ilCAotiiC&SUt, 7>>v:i£A J <!:[3:§fl«3593;tt7u„ tSZ, 

Ar-r„ "ct. -7->>ts^ffioto, 3D©a^*t"*6ti*abti3U 
b/isifflii^css/urto sc&icfruutuAis, uv77©id 

6866149ST-0 SL7BBtSM8 
iy-Atfi"3'otffl®CttjrLiSIIU : t©li 

n*6ttA 5 }gs(s©#mii;Mx^'rtf> s 







4SMs.*i«8£- 



C100-C1 32 

g$S©llfiM§f 

CI 33-CEBC 

tt©^K 

C2ED-CB31 

^— A^T— A— ¥U^ 

CB3E-CE68 

Fffl7J^-x-^Jb©«*J@x. 

Ccfc-S) 

CE69-CE7D 

7MJ bio.- Kf-7iKDiS 

JUx) 

C27E-CE91 

HL-DExA, lY-BCx 

CE9E-CEAC 

CEAD-CSC4 

VRAM7 7 KbXiS^-y'^ = b 

16-CY, bl5~b8-A7~A 

0, b7~b0-0 

*bn : VRAM^KUXffltf 

7hn, CY : *-f'J-7^\ 

An : AUvT.^CDtf-i-hn 

C800-C81 F 

§ IS©X?5iJ£ 1 6iIS<i:&& U 

r. c8E0~CBEitf?rr 

7KbXiy^Ct§fflf5(US 
R3) 



Q-^iyy 




- SJH^ j^jh;^ .j.n^^iWfcfe-tz-^-flBArKSi *) 



CEC5 

Ts^YMUIS^YS' 
CECB 

»^7^^'(^-A7r-7\:-7 

CEC7-CECB 
7. =17 
CEC9-CECA 

CECB-CECC 
g«Yffll 
CECD 
g#3gYJ3?7> 

CECE 

CECF-CEEO 

iSx-^MO :6*fcBT, 
16:*». 32:££fc»±) 
CEE1-C3B4 

Sx33 «§?©! ottiVK 

Y-7) 

+ : g^tODSiH 

+ i : ymm 

+E : Xfflf 

+ 3: xy^-CWtftim 

C3B5-C3E4 

7,^^YS7h'Jt:'i-hx- 

7JH*iA*7\:'V7 7 



C3E5-C4A4 
CBEQ-CBE1 



R3©!l^©l-3) 
CCOQ-CCBF 



CD0Q-CDFF 
CE0O-CE7F 



CF00-CF3F 
?fSffl;t>^— =1— K 



(ANTARES) 



W-RETURN.F06 



IB CLEAR300.SHC080:SCREENB. .8:C0L0R15.B. 

B:KEYOFF:UIDTH48:DEFINTA-Z:BEEP 

2B L0CATE11 .8:PRINT"The way to Return" 

38 L0CATE14.11 :PRINT"Ualt ! 6Bsec." 

48 L0CATE18. H : PRINT"Cr eat ell by Influenz 

a":OPEN"GRP:"ASl :T=STRIG I 8 > : PLAY"T2S5L80 

6V13C05AFGR"."T255L804V12CFADR" 

58 IFPLAY(B)THEN5BELSES0UN07.156:S0UND6. 

25:S0UND18.16:S0UND11.188:S0UND12.15:S0U 

ND13.8:FORA=8T0588:NEXT:SOUND12.3:SOUND6 

. 15:S0UND13.8 

68 DEFUSR=SHCBB0:DEFUSR1=8HC065:DEFUSR2= 

SHC099:DEFUSR3=&HC808 

78 IFTTHEN130 ELSE F0RA=BT033 : P0KESHC8BB 

»A.VAL("SH"»riID$("EB46235E23562A2BC8lA13 

D63BFEBA3882D6B7ED6FC84828812310ED2220C8 

C98BCB" .A»2+1 .21 ) :NEXT 

8B F0RA=BTO9:READA$:At=USR3(AS) :NEXT 

98 READA$:POKESHC828.8:POKE&HC821 .&HCC:A 

$=USR3(AS) :A=USR(B) 

188 F0RA=BT0255:P0KESHCDB8»A.RND( 1 )«256: 

NEXT:FORA = 8TO135:POKE&HCEBB*A-8.2048*A-1 

:NEXT:A$="234565F3-:B$="787ABA98" 

1 10 FORA=0TO79:POKE&HCF0 0tA.VAL("&H"+MID 

S(AStA$tB$*B$.A*2»l .1 ) ) :NEXT 

128 0NST0PG0SUB26B:ST0P0N 

1 S« S0UND4. 1 20: SOUNDS. 8 :S0UN07. 184 

140 SCREEN4.3:RESTORE380:FORA = BTO15:READ 

B:COLOR=(A.B*1B0.B*10MOD10.BMOO1B) :NEXT 

158 AD=5H382B:F0RA=8T015:LINE(7-A*2.7-A¥ 

2) -STEP (A. A) .1 .B:F0RB=BT031 : VPOKEAD . VPEE 

K(BM0D8»(B*8M0D2)«256»(B*16)»8) :AD=ADtl : 

NEXT:CLS:NEXT:SPRITE$18)='*'' 



16B LINE (72.67) -(199.67) .13:LINE(72.711- 

1199.71 ) . 15:F0RA = 72T073:DRAWBn = A: .64":P 

RINT#1 ."el23456789SC0RE=" :NEXT 

178 FORA=8T015:FORB=BT01-(A=l 1 ) :A0=SH84F 

♦A«8-B: VPOKEAD. VPEE K< AD- 1 ) : NEXT: NEXT 

188 FORA=0TO31 : COLORSPR ITE < A > = 1 2 : NEXT : A= 

USR1 (01 :C0L0R=<15.7.7.7) :GOT0218 

198 A=USR1 (8) :SOUND7, 152:S0UND1B. 14:S0UN 

D4.8:S0UND5.2:F0RA=8T0319:S0UND6.A*1B:NE 

XT:A=USR2(0> 

28 8 FORA=BT01BB:SOUND18. 1 5- A*1 8+AMODS : CO 

LOR. . 12tAMOD4:NEXT: COLOR. .B 

218 B$ = "FF"*RIGHTSCBBB"»STR$(PEEK(&HC2C 

7)*PEEK(SHC2C8)«256) .S)*"F" 

228 VPOKE&H1E00.216:AS="FFFFFFFF":FORA=B 

T047:VPOKESH198Ct(A*8)»32»AI10D8.VAL ("SH" 

«MlD$(ASt"FABCDEFF"»A$«B$tA$*A$.A»1 . 1 ) )♦ 

9:NEXT:BEEP 

238 AMAtl )M0D3:IFSTRIG1A)=BTHEN23B 

248 S=STICK(A> :B=(S>3ANDS<7)»2»1 :POKESHC 

BOA.A:BEEP 

258 FORA=0TO8:POKE&HC2CF+A«2. (1-(A>5)»(A 

>1ANDA<5) >»16:POKESHC2D0*A»2.16-l (A=80RA 

=10RA=2)-(A>3ANDA<7) ) »16»B: NEXT : GOTOl 90 

268 STOPOFF:SCREEN0:BEEP:PRINT";i*»/K°-X* 

-SRUNf",7<v7^«-H !-CHR$(13l ; :END 

278 DATA 2AB6BB7D324AC27C325DCB3285CB326 

BC23C32AFC2BE8B791E48S137CDADC24A86C1697 

8D661D238C079ED446F3E6090 3C26B0292929C5 5 

F1608EBCDE631C17DB43E4BCA5CC011 

288 DATA F401B7ED52D25CCB7DE6BF6F78FE687 

DDA5CCBC628D398iaC28CC217CBC921BBl8CD7lB 

1444D21BaCCCSS6235E23E5EB862a7929D288Ce3 

EB8CB1ACB1BD39878FE1 1C28DCBEB1B 



29B DATA EAE1C18C79E6B74F18O8C921000822C 

7C226Be22C9C222CBC221E88822CDC2AF32C6C2B 

E2116Be21E1C272237AC6B8571EE879FEBAD2CCC 

0E682B35FCBC3B6B3732318FC8DC2B8 

380 DATA C82B36883E08CDD508ED5BCDC28721C 

FC24FB6BBB946234E7A8BCB6BCD92C2677B81CB6 

1CD92C26F22CDC2ED4BCBC25C26BB54292929B9D 

A1CC17CD60467DA1CC122CBC2CS24C1 

318 DATA 3ACDC2ED4432CDC22AC9C2EB2929291 

97CD6B46722C9C221C5C234DD21E1C221E5C3DD7 

E03B7CA2DC2E5BFDA59C1DD7E21DD77B1DD7E22D 

D77B2C37AC1BFD272C13AC5C2E683DD 

328 DATA 7E82C26AC 1 D66BC61 8DD77B2C37AC1 D 

D7EB1C64BDD77B10D35BBDD7EBBE63F16CE5FFE3 

FC2BDC13ACCC22FC68B47DD96B1C61CFE44D2ADC 

13ACAC2DD96B2C614FE2A02ADC13E81 

330 DATA 32C6C20D7BB12AC7C22322C7C226CD7 

EDD77B2DD7E81B6B0C68B4F1A57E6FC2ACCC2600 

9477D25CA07C1CBCB2F5FDD4EB23ACAC291CB7FC 

AE7C1CBC82F874F78887A218B8BFD21 

340 DATA BB8B4555CD7EC2B8BE7B577CB9D213C 

2CB3AD288C22F3DC65 85FFDE5E17CB9DA15C21ED 

CCB3AD21CC22F3D81E12B2B722B772B7311B4BBD 

D19C33EC13AC6C2B7C0F33ACCC2371E 

359 DATA BBCDADC23AC5C2E6BF4F21 E4C316CFB 

6C0DB9B815F1A237710F71148183E83087AC6085 

7CDADC20E980648EOBB083D20EE513E1E1E4BB7C 

DADC22165C34AB68BEDB3FBC3D9C8B7 

368 DATA C81 FD287C21 9FDB9CB23CB1 2CB21 CB1 

BC37EC2CA9CC2FE90DA9EC2D618D618FE18D2A5C 

23E18FEE9DAACC23EE8C947BE99171717E6B7ED7 

93E8EED79AFED7978E63FB3ED79C99B 

370 DATA 88B004B0B2B001FF0100828BB28BB24 

004488428 842008108818888818 881 8 BC1B3E2BC 

D231D2C143835C87784D783B7 

3S0 DATA 88e.BB8.B22.B33.B44,855.B66,B20 

.030. 040. 050 .060 .775 .400. 600. 008 
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H h-^JUS-^TK-Oh 
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>S 

I - Js K Jb-^ffl 

K(L) Sb^jbK^^TK-Y 

L U^JU 

M, Kk MS 3t?S^ffl 

S 7K-OK 

S(L) tSU^JUtK-OS 

u mmvtz?^ 

x nrcDxmm 



yno^mm 



BO Ky^»K-f>S«36 

30-60 ^-TKJUi® 

30 \d-y. wmo^T/ 1 ® 



40 

hi 

50 



60 ^l^g/^SiS^/RE 

70-110 y-Ax^-s 
70 llH^U^/^-Ar'ff 
5+zlO"J©^'^7-t-->^7© 

S^/'-X^^ — >< — f>3>© 

-y-^'jb-^vzi-jb 
80-100 f-hwm^m 
no aT^taoisutoofu 

BC+aOUfflawJCffB) 

ieo-130 x^>ju-^> 
ipo u^\jL/i ^^©^zlo 
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A* Bf ffliJ iAa^O N / Bile 
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130 aTii/Oi-fh/ 
5Jl/-:flH7/"'\*:"««<i: 

■r/hu^-A^BtoiJOiA 

&OFF 
140 L/^l/*S77^E8BJHf/ 
ST^B) 

150-220 TK-rvhitu 

150 Hffi©H8&#©*3.9 

u©^^its(^i6orffiffl) 

160 /1W>SC»Qlf£tt& 
ngB^^, S&«©TC;1£ 
170-210 tK-OKSQP, m 

220 0x-YS/U^ibA^5 



rli&n&b'-*iT70 / \lft'3 i ; 
230-300 <r-AiVK 
230 SaJgrt/U^JL/EOfHiS 

240-250 U^JUil^iSiE^ 

/^ 

2B0 S-^JWi^a^ 

270-290 A-Y^T^MI/I 

UfctS©?^ 

300 U^UfSKKMJ*- 

A^Sfctt-SBtr^tffcofc 

310-320 +aOU^tJ]§x=E 
©tt^U-^V 
310 h'J^-ASBtroiJO 

320 ^-vl CiJQofc^n 

-v o ca tf-/ / s©sas / \ 



is 

330-420 SMblSS/U-^V 
330 HSeiS^/liH'E- 

/SU^-A^BfiJO^© 

JRtf5fcJg>t(fj31Q)/A3- 

340-370 +iO'J^^-y 
1 icfiK 

380-420 ST^^-S>'e. 
3lc}ffi< ttCffillCMf. 
430-440 ^^VKH^BfWT 7 

450 x^-fe-y^^-y-^ju- 

460 vbmsy-Jn-^y 

470 REMX 



ti§£ 



:©^-A-cis, *3.ov 



«0SS|g^©(t$C^©d;5C 

^7i-^£tMom§© 

^mi-^5AIJ^330~a420lc 

SETPAGE, n 
(n|J0~3©HS£) 

SETPAGE n, n 
d:'©d;5CSCREEN5©^ 



(Ore) 



II G0SUB33B: ' — * :> •> ') 5* !! — 
28 F0RL=8T04:H(L)=2B8:NEXT:H=1B8B 
31 BEEP:CLS:PLAY"SBM38BB04L16C8EDE8FEFGA 
B05C2" . "V1303LI6C8EDE8FEFGAB04C4"."V1206 
L16CEDFEGFAGAAB07C2" : FORI =8T06 : COPY (63 . 1 
211 -(255. 149) . 1TOIRNDI1 )«64.I«32) :NEXT 
41 F0RI=BT07:COPY(B.8)-(29.192! .1T0(I«32 
. RND11 )»2B) . .TPSET: NEXT: COPY(B.81-( 199.3 
8) .3T0I25.64) . . TPSET : M = 88 :N = P1 : n$ = "4 2 1 
>l «»l !":GOSUB458:COLOR.1 : PSET ( 68. 1 28) : PR 
INT*1." HIT SPACE KEY " : M = 2B :N = 1 52 : MJ = "A 
CTION COOKING SERIES vo I . 2" : GOSUB45B 
58 AMA+1 )M008:COLOR=<1 . A . U*3 . U+ 1 U=8 1 ) :U 
=STICK(B1 :IFSTRIG(B)=8THEN5B 
68 COLOR=(1 .8.8.8) : LINE (68. 1281-1187.127 
) .».BF:A-1 :B=2B:GOSUB46B:L=8:S=B: RESTORE 

■■' CIS: COPY (68. 128 1-1255. 147) .1 TO (68. 158 
) .1 :M = 96:N = M:MJ = "LEVEL"+STRS(L + 1 ) :GOSUB4 
5B:FORI=BT028eB:NEXT:GOSUB438 
38 LINE19. 71-1246. 191). 15, B:LINE(18, 1191 
-(245.122) .9.BF;LINE( 18,1 23) -(245.1 4B) .1 
B,BF:F0R1=BT042ST£P2:LINE111+I . 142+1) -(2 
44-1. 189-1 ) .15-1*3. BF: NEXT 

98 P1=188:N=128:M$ = "LEVEL"»STRS1L+1 ) :GOSU 
845 B : RE ADA : 11=72 :N = 28 :M$ = " PARTS x"*STR 
$(A) :G0SUB458:B=16B/A:C0PY(1BB.158)-STEP 
(B-1 .291 .1 TO (128-8*2. 121 :M=64:N= 1 54: IFUT 
HENPRINT»1 . "EIUS'U" : DATA8 . 1 8 . 1 6 . 32 . 48 
188 M$="TOP POINT" : GOSUB45B : 11 = 96 : N= 1 78 : II 
$="P0INT":G0SUB45e:C0L0R=<a.8.e.B):PRESE 
T( 168. 154) :PRINT§1 . USING"***" ;H ID 
1 IB SOUND1 .1 :F0RX=125TO284:SOUND8.255:SO 
UND8. 15:SOUNDB.255-X:COPY(8. 1681-19.199) 
.3TO(X,58) : NEXT : SOUNDS. B:GOSUB31 8: COPY (2 
41 .128) -(255. 144) . 1TOI21 1 .94) 
121 FORX=284T046STEP-l :IFU=8THENSTR1G(8> 
0NELSEIFI285-X)M0D(168/A)=8THENG0SUB318 
138 COPYIB. 1681-1 1B. 199) ,3TO(X.5B) :FORJ= 
BTO3B:NEXT:NEXT:G0SUB318:STRIG(B)0FF 

41 COPYIB. 1681-1 18.199) ,3TO(X.5B) : SOUND 
7.56:PLAY"SBM2B8B05L16C0.E.FG8ABBB06C"." 
SBO6L16CD.EFG88.BBBO7CR1605C":FORI=BTO35 
: COPY (8. 168 1-19.288) .3TO(45"I .58-1) :NEXT 
158 B=8:FORI=289T051STEP-1 : B = B- ( POINT 1 1 . 
991=1 1 : IFB-ATHENNEXT 

161 FORJ=98T0118:COPY(241 .1161-125 5.234- 
Jl . 1 TO 121 1 .J) : COPY (68. 1491 - (29+1 . 267- J 1 . 
1T013B. Jl :NEXT 

178 B=16B/A:C=1 : < 1 L 1 = 1 5 : S ( L I =8 : BEEP : FOR J 
= 2B9T048STEP-1 : I FPOINT ( J . 99 1 -1 THEN22B 
138 LINE (48. 41 1-1228. 89 I . 8 . BF : L INE ( 1 28-B 
*2.41 )-( J+1 .89) .15:LINE-STEP(B-2.B) :LINE 
-1127+B*2.41 1 .15:LINE-I128-B*2.41 > . 15 
198 S0UND7.7:IFOBTHEN218ELSEIFC = BTHENC0 
LOR=<8.4.7.71 :S(D=S(L)+C»3:SOUND6.18ELS 
EC0L0RM8.7.7.B) : S ( L ) =S ( L ) »C : S0UN06 . 28 
281 S0UND8.16:S0UND12.18:S0UND13. 1 



218 C=8: COLOR=( 8.8, B.8) : PRESET! 168.1 7B) : 

PR INT* 1 ,USING"##*":S(L) : IFU=8ANDS(L) >H(L 

1 THENK ( L ) =9 : H ( L ) =S ( L ) : PRESET ( 1 68 . 1 54 ) : PR 

INTH1 .USING"#t#" ;H(L) 

228 C=C + 1:NEXT:S = S + S(D:FORI=8T02BB8:NEX 

T:L=L+1 (IFL-5THEN7B 

2 58 BEEP:PLAY"V15L32038AGFER16DR16CDEDCR 

1604C16"."V15L3206BAGFER16DR16CDEDCR1607 

C16":FORI=BT07B:LINE(8.I 1-125 5. I »2) .5:LI 

NE( 1.21 1-1*2) -(255.21 1-1) .3 : NEXT: LINE (45 

.53)-(218.158>.8.BF:F0RI=aT0l8:LINE(4B+I 

.48*1 1-1215-1. 155-1 1 .15-ABS1 1-5) .B:NEXT 

248 11 = 56 :N = 64:M$ = " RESULT ":GO 

SUB45B:LINE(59.75)-(194.84) , 4 . BF : M=6B : N= 

76:M$="LEVEL TOP-P POINT" : GOSUB458 :M=68 : 

FORL=BT04:N=86*L»12:M$=STR$(L+l )+"-": 80S 

UB45B:A = 2:B=16:GOSU846B:PLAY"C32" 

2 58 FORI=8T01 :COLORK(L) : PRESET ( 1 88+ I .N ) . 

.TPSET:PRINT#1 .USING"**** ****":H(L1 :S( 

L) :NEXT:NEXT:FORI=8T01 :I=-STRIG(8):NEXT: 

B=3B:GOSUB46B: FORI =8T06: LINE (44+1,75+11- 

(21B-I. 158-11. (1B»I)M0D16.BF:NEXT 

208 P1 = 64:N = 96:MS = "T0TAL SCORE" :GOSU8458 : 

PRESET! 16B.N) :PRINT*1 . USING"****" ; S : N=l 2 

8:tt$="TOTAL TOP-P" : GOSUB458 : PRESET ( 168 .N 

1 : PR INT* 1 .USING"****" : H : FORI=BT058B : NEXT 

:IFU0RS<HTHEN38B 

278 H = S:!1=56:N=188:t1$ = "YOU get TOP POINT 

i":F0RI = 8T04:PLAY"SBI19ee805L32CDEDE","V1 

307L32CECEC.":G0SUB45B:LINE(56.188)-(196 

.117) , B.BF: NEXT: FORI =BT018B8: NEXT 

288 SOUND1 . 1:SOUND3.1:FORI=8T012:A=255-I 

•21 :S0UND8.A:S0UND2.A-3:S0UN08, 15:S0UN09 

,14:PRESET(16B,96+I»2) :PRINT*1 .USING"*** 

*":S:NEXT:SOUND8,B:SOUND9.B:FORI=96T0119 

: LINE! 16B . I I- < 191 .11 ,B:NEXT 

298 S0UND7,7:S0UND8,16:FORI=BTO31:SOUND6 

,I:S0UND12,32:S0UND13,1 :COLOR= ( B.4.4 . 7) : 

COLOR= IB, 8, fl, 8) :NEXT 

38 B IFINKEY$O""THEN3BBELSEF0RI = 8T028BB: 

IFINKEYI=""THENNEXT:GOT038ELSE38 

? I.) STRIG(8)OFF:SOUN07,7:SOUND8,16:S0UND 

9.15:SOUN012,16:SOUND13.1:FORI=8T07:SOUN 

D6.I«2:NEXT:F0RI=5BT078STEP1B:C0PY(8.16B 

1-19,199) ,3TO(X.I) , ,TPSET:L INE (X, 1-91- (X 

♦7.1+11 ,B.BF:NEXT:S0UND9.B 

52 8 SETPAGE. 1:LINE(X+35,15B)-STEP(B,27), 

1 :SETPAGE.8:COPY(X+33.158)-(X+37.177) .1T 

01X+3.9B) :X=X-1 :RETURN 

338 COLOR15.B,8:SCREEN5:OPEN"GRP:"AS*l :D 

EFINTB-Z:ONSTRIGGOSUB31B:FORI=1T07: COLOR 

MI + 1 ,B,I ,B) :C0L0R=(I+8,I.I,I) : NEXT: COLO 

R=(9.6.8,B) :COLOR=(1B,4.B,8) 

348 SETPAGE, B : M = 68 : N=8B : M$ = "L.11*'5< 8i5<E" 

5-u":GOSUB45B: SETPAGE. 1 : CLS : FORI =BT06 : A" 

2+I:CIRCLE(13.4B).48-I»4.A...3+I».7:CIRC 

LEI 133. 12) ,12-I A 1 .4, A: CIRCLE (183. 134) .48 

-I+.4.A. . ..34-1/ 38: PA INK 13.48) .A: PAINT (1 

33.12) .A: PAINT! 183. 134) .A:NEXT 



558 C0PY(B.48)-(29,79) .1 TO (B.I 52) :COPY(1 
B3. 1281- (143. 149) .1 TO I 21 5. 128) :F0RI=39T0 
149STEPU : COPY 18. 35 1-126.45) .1 TO IB. I) :CO 
PY1 98.1 2BI-I1B8. 149 1 ,1 TO 163 + 1. 128 1 :NEXT 
^68 FORI=18T0179:A=RN0( 1 1 "8+2 : 8=RND ( 1 1 «2 
B:PSET(4+B.I 1 .A:PSET(63+I .124+61 .A:NEXT 
378 F0RI = 1T03:A=192/(192-I«48I :FORJ = BT01 
91-I»4B:COPY(B.J«A|-129.J"A) .1 TO (I •38. J> 
: COPY! 255- J»A, 128) -STEP 1 8 .29) . 1 TO (255- J • 
128-I«38)':NEXT:NEXT 

388 SETPAGE. 8:CLS:M$="tT Ltt*^ l*-1-> ! 1 " : G 
0SUB458 : SETPAGE. 2: CLS: FORI =8T04:A=1 5-1 :L 
INE1 16B. 168)- (168. 198) . A :CI RCLE ( 58 . 161 ) . 
5B-I»2.A.3.14+I/98.4.8..72:LINE(I.16B+I* 
2) -1168. 168+1*2) .A:LINE(58.19B1-(16B. 198 
-I«2) .A.8F: PAINT (158. 178) .A: NEXT 
398 COPY (68.159)-!12B, 161 I ,2TO(8.16B) : FO 
RI=8T037: A=IflOD2: LINE! 162+1. 16B) -STEP! 8. 
6+6«A) .9»A:LINE!162+I.l66+6«A)-( 162+1.18 
81 .18-A:NEXT 

488 F0RI=1T04:A=48/(4B-I«81 : FOR J=BT039- 1 
• 8: COPYIB, J«A+ 168) -STEP 11 99. 8) .2T0IB.16B 
-I»4B+J-6«(I=4) 1 : NEXT : NEXT: FORI =8T06: COP 
Y1B.7+I )-( 199.7*1 1 ,2T0(B.7-I*2) : NEXT: LIN 
E1161 .41-1199.12) .18.BF 

418 SETPAGE.3:CLS:COPYI8, 16B ) - ( 199, 199) , 
2T0(B.B) :FORI=1T03:A=28B/ (218- I •61) : FORJ 
=8T0199-I«68:C0PY(J«A,B)-STEP(B,39) ,3T0( 
J.I«4B) : NEXT: CI RCLE (162/ A. I«4B»1B) .18.9. 
1.57.4.71.3:LINE1162/A,I»4B)-STEP(8.19). 
9:PAINT1162/A-1 .I»4B+18) .9 

428 CIRCLE1162/A. I«48+1B) , IB. 1.1. 57. 4. 71 
.3: CIRCLE! J,I»48+18) . 1 1 . 1 . . . 3 : PAINT ( J . I« 
48+18). 9. 1:NEXT: LINE (2. 171 1-15.1 99 ).13:L 
INE (5.1 99 1-18. 171), 13: LINEI8, 171 1-12, 171 
1 .13: PAINT (5, 172) ,15.13:CIRCLE!5.171 1 .18 
,1,,,3:PAINT!5,171),9,1 : SETPAGE . 8 : RETURN 
4 38 BEEP: SOUND! . 2 : A=8 :COLOR= 1 B . 8 . B , L» 1 1 : 
F0RI=BTO4:CLS:C0PY(I»38.8)-STEP(29.191-I 
•41) .1TOI1 13.IH2B+1B1 :C0PY(B.I»4B)-STEP( 
199.391 .2TO(48.9B-I«1B) ..TPSET: FORJ =4»LT 
028- I: SOUNDS, 15:SOUNDB,A:A=A+2:NEXTJ. I 
44 8 A=194:FORI=1T04:CLS:SOUNDB.A:COPY(22 
2-I«48. I»38)-(255.I»3B+29) ,1T0( 1 12-I»28, 
981 :C0PY(B.I»4B)-STEP(199-I»48.39) .3TO(I 
•38 +35+ 3B» (I =4) .51) . .TPSET: FORJ =LT02B- I « 
3:SOUNDB,A:A=A-3:NEXTJ, I : SOUND8 . 8 : RETURN 
4 58 FOR J = 8T02: PRESET (11, N-J+2) , , TPSET: COL 
0R11+2«J.8:PRINT*1 ,M$: NEXT: RETURN 
468 SOUND1 ,B:F0RJ=15TO8STEP-A:FORK=8TO25 
5STEPB: SOUNDS. K:S0UND8. J:NEXTK. J: RETURN 
47B ' — Rel.ese On Feb. 2B. 1992 by YK 
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BLOKTOUR.FD6 



10 COLOR15 . 1 -1 :SCREEN1 ,2.0:WIDTH32:KEYOF 

F:CLEAR200:PRINTSPC<10)"»;Lli»S<S»JU" 

2B DEFINTA-Z:DEFSNGS:DEFFNR=RND(1 )«5:DEF 

FNS»STR!G(0)«STRIG(1) : DEFFNV ( A . 8 ) =VPEEK 1 

6144«A*B»32) : DEFUSR= 342 : A=RNO ( -TIME ) 

30 DIMAS15) . A(3) . L(20) .R(20) : ON INTERVAL = 

60GOSU8380:PLAY"S0M8000T200" 

40 A$=CHR$(255):B$=STR1NG$(6.0):CI=STRIN 

G$<8.0) :SPRITESC0)*AS*STRING$(6.128)*A$« 

C$+A$+B$+A$:SPRITE$(1)=A$*BS+A$+CS4A$+ST 

RINGSI6.1 )»A$:C$=" 

5 READA$:FORI=0TO5:FORJ=0TO23:VPOKE1416 

»I«64tJ.VAL("&H"»MIDI(A$. J»2*1 .2) I :NEXT: 

NEXT: FORI =0TO1 : RE ADA . A$ : FOR J=0TO7 : VPOKE A 

♦J.VAL("£H"+MID$(AJ,J»2»1 .2)1 : NEXT: NEXT 

60 FORI =0TO5:READA$:A$(I>=A$: NEXT: FOR 1 = 

TO7:READA.B:VPOKEA.S:NEXT:FORI=304TO727: 

VPOKEI.VPEEKII)ORVPEEK(I)*2:NEXT 

70 'data 

80 DATA 007F7F7F7F7F7F0000FFFFFFFFFFFF00 

00FEFEFEFEFEFE00. 1 344 . FFFEFDFAF5EAD5AA , 1 

760.FFFFFFFFFFFF0000 

90 DATA K44»*a3»ifmf . ;«»t . &iyt . ILM-a 

100 DATA 8198.177.8199.177.8213.113.8214 

.33.8215.65.8216.129.8217.161.8218.209 

110 DATA BCDGLMNORSTVY.BEGLOQVX.BCDGLOOV 

W.8EGL0QVX.BC0GHIJLMN0RSTVY.ABCDEGHIJLPR 

STUUXYZ.CGJLPRUZ.CGJLNPRSTWXYZ.CGJLNPRWY 

.CGHIJMORSTUUZ 

120 'title 

130 CLS:PRINTSPC(6)"EIGHT-IR0N PRESENTS 
- : PRINT : FORI - 1T01 20 :PRINTAS( FNR) : :NEXT 
14 RESTORE 1 10:FORI=4TO14:IFI=9THENNEXTE 
LSEREADA$:FORJ=1TOLEN(AS) : LOCATEASC ( MI D$ 
(A$. J) 1-62.1 : PR INT" 9" : NEXT: NEXT 



150 LOCATE10.18:PRIN 

6)"CURS0R KEY SEL 

Y START£PUT"SPC( 12) 

P"SPC(47)"PUSH SPACE 
160 FORI=0TO1 :I=-FNS 

170 'graphics 

180 CLS:SC=0:ST=0:FO 
RINTSTRING$(32.168) 
190 ST=ST+1 :B$="5:0 
TAGE"STR$(ST) ; : LOCAT 
200 FORI=1TO20:LOCAT 
A$(FNR) : :NEXT:C=FNR 
STRING$(2.2B)A$(C) :R 
210 FORI=1T08:A=INT( 
1 )»19*2:IFFNV(A.B)=2 
LOCATEA.B:PRINTA$(5) 

220 'main 

230 A=0:B=80:L=20:R= 

M0D4)=1 :L(I)=32:NEXT 

XT:FORI=0TO500:NEXT 

240 I=USR<0) :D=STICK 

3)«(A<3)-(D=7)»CA>0) 

= 0TO1 :PUTSPRITEI . (X» 

250 IFFNSANDFNV(X.Y) 

=A(A)t1 :IFA(A) >20THE 

260 IFFNV(X.Y)»217TH 

FNR:FORI=0TO3:LOCATE 

0TO200:NEXT:LOCATEX 

O200:NEXT:NEXT 

270 L0CATE27.22:PRIN 

RINKEY$=CHR$(27)THEN 

280 'put(sub) 

290 PI_AY"OL16DC":L(l 
77)*8:L0CATEX.Y:PRIN 
A$(C) :IFL(1I=R(1 (AND 
300 FORI=20TOLSTEP-1 
-1 )< >RtI-1 )THENR=I : I 
310 IFL(L)=R(L)ANDL 



KEY FUNCTION"SPC( 1 
ECT"SPC( 12) "SPACE KE 

ESC KEY GIVE U 

KEY"; 
NEXT 

RI=0TO21 :LOCATE0.I:P 
:NEXT:GOSUB360 
":LOCATE1 .22:PRINT"S 
E22:PRINT"TIME "B$ 
E2. I:FORJ=0TO3:PRINT 
PRINTSTRING$12.28)C$ 
(I)=C«8»177:NEXT 
RND(1)«4)»4*2:8=RND( 
17THENIM-1 :NEXTELSE 
NEXT 



L:T = 
FOR 
TIME 
(0) 

:X=A 

B*I- 

>32T 

NA(A 

ENPL 

X.Y 

Y:PR 



1 :FORI=1TO20:A( I 
I=0TO1 :I=-FNS:NE 

0:INTERVALON 
STICKC1 ) :A=A+(D= 

4+2:Y=A(A) :FORI 
16.Y»8-1 ) :NEXT 
HENGOSUB290:A(A) 
)=20 

AY"05L16CEG+" :C= 
PRINTAS15) :FORJ= 
INTA$(C) :FORJ=0T 



TBS: IFB< 10RL<10RT<10 
440ELSE240 

)=FNV(X.Y) :C=(L(L)-1 
TC$:LOCATE20.L:PRINT 
=2THENRETURN400 
IFL(20)=R(20)ANDL(I 
=L:NEXTELSENEXT 
RTHENPLAY"07G8C4" 



320 IFL<20THENIFL(LI=L(L*1 )AND(L(Ltl )<>R 

(Ltl )ORL*KRORL = 1 ) THENPLAY"02L 1 6DCDC" :G0 

SUB340:l(l)=32:L(L*l)=32:L=L*2 

330 B=B-1 :L=L-1 :RETURN 

340 FORI=0TO3:FORJ=0TO1 : LOCATE20 . L* J : PRI 

NTA$(C) :NEXT:FORJ«0TO200:NEXT:FORJ=0TO1 : 

LOCATE20.L*J:PRINTC$:NEXT:FORJ=0TO200:NE 

XT:NEXT:RETURN 

350 'sub 

3t>0 AS = " 00000 0":.IFSOSHTHENSH = SC 

370 LOCATE1 . 23 : PRINT"SCORE"RIGHT$ ( AS+MID 

$<STR$(SC) .2) .7)" HI -SCORE "RIGHT$(A$*M 

ID$(STR$(SH).2),7) : :RETURN 

SSI PLAY"O8C16":T=300-TIME/60:B$=MID$IST 

R$(T¥60) .2)*":"»RIGHT$("0"»MID$(STR$ITMO 

D60) .2) .2) :RETURN 

390 'stage clear 

400 INTERVALOFF : PlAY"0L32CDEFGABO5CDEFGA 

BO6C8":PUTSPRITE0. (0.208) 

410 LOCATE4,10:PRINT"STAGE CLEAR":SC=SC 

t < 100 0+IB-l )«10)«ST:GOSUB360 

4 20 FORI =0TO5000: NEXT : FORI=l TO20 : LOCATE2 

.1 :PRrNTSPC(16)STRING$l2.2B)C$STRING$12. 

28)C$:FORJ=0TO200-I«10:NEXTJ. I :GOTO190 

430 'game over 

440 INTERVALOFF: PL AY" L0DEDGFEDC03B-L2A0E 

C1":PUTSPRITE0, (0.208) 

450 LOCATE5.9:PRINT"GAME OVER" : L0CATE3 . 

12:PRINT"PUSH SPACE KEY":TIME=0 

460 IFTIME>3600THEN130ELSEIFTIME>120ANDF 

NSTHEN180ELSE460 
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ES3 CS32/2+RAM32K by SILVER SNAIL 



► ®TOtt4E^-y 



d yu^v-^^^cDWR 

h yis-tv-^-v^tD'Mm 

M 7Kffi(^+XhY)S^) 

Q(n) ^U-ff-^v^CD 

ft$nC£tirr-5XSIiff^ 

X ^b-f-^-^-f^roXJ! 

^U^YhXSI©^^ 
OloWSU X^YhXlSfi 

Y ^bY1-?-+-f^©YJS 

ffifU^YSYJIfiClqli;) 

a ^y^-*-^©^ 

(D~l4r\«KBAx2C^fS 

|q|i;)/-Bf£g! 

AS, C$, QS, W -Bf 



AD 7YYl§7d^A5t 

b mm(-w~Q) 

ds y^^stt^- 

Y'x— ^ 

G h'Jtf-AM 

i > j, k )i-yt>yyy 

N AY7. =17010^01 

O XU^ffllO^KDl 

P ^bYl 7 -^^©^ 

Q 7bY1?-+-f^©[S]£ 

(0:6, I : S) /H6£» 

r yis^^ommm^ 

s yj-<^yxu% 

S(n) T.x-r^ASflg 

&il(0 :& I :£, 3 : -E-© 
ftfi) 

T 7MLtP^Y5Y?'»S 

mfi0>9 

U ^S-(USRPISffl) 

V(n) a-Kn©£?©» 

H(0 : LtiPT-^Y-^K- 
SC I : £11 • ttiP±, 2 • 
3 : d;i;etimMg, 4 : £1! 
gnsSofc/cL, ntfi63lYT 
Sfcttigp~l95©ti^lJflSg 



ft) 
■3.-+f-S»MU 

fn a yu-fv-^v 5© 

FNB ^'UY1 7 -+1'^© 

TCSS+-f^©»P, 

FNC ^bYf-Y-f^© 

£7t,CS5+1'^©X?=l- K 



30-33 : 5E l -3 

34-35: /K-S l-SW-Jl/ 

3B : ^m^^ffl 



w-:/Si**5$* | 



pit 

$< l -3 
SBY>Y^l • 3 

^iSA(^if)Y>Y^ 
B^-eY^- B) 

tlYYY^B, SB 



0~l 

3-7 

B-9 

I0~!l 

IP — 13 

3, 

14-15 

Y>>75 

16-19 :Mi&B 1-3 

SO — 21 : $iJY>Y7l 

£2-29: cti;§51-4 



(-E-n-ett32£ JO^fct©!*, 7j< 

1 64-167: ^ 
168: ttin± 
l69:ffiPT 

170 : *'YX 
171 : OS 
172:551 
173: 553 
174-175: r ^^j 
176-188: c£i;gtt&LM£ 
1B9-191 : ctUMM 



yntt^kmm 



10-60 REM£ff5iM)7.7^ 

Y SA5 7 — vyi*u- 9t— 
y)i7-y 

70-100 ^n^AMIb 

70 y^mm-yyymmm 



10 '0000000ia3030i0i0i0i0'0i0it)i0iai000« 

0080C04080000000000000000080000000010 3 03 

0103030S03010202040200000080C04080000000 

8040404060000000000 I 030301030 5 09090 2 020 C 

100800000080C 04080008040804040203000 

2 '000000010303010303050301021C10000000 

0030 C 04080000080008040404060000000000103 

030103050 5 02000102010000000080C 040800000 

0080408000000000000000010303010305090900 

0101000000000080C04080000000C0E08000 

30 '000000010303010101010100000102010000 

0080004080008060008080000080000000010303 

01010101010101020201000000A0C050E0600000 

804040804000 000 00001 030301 0303050 301 010E 

8 0000000080 C 04060000080006040404060 

4 '0000000 103030 10305090902021 CI 0000000 

0080C04080008040804020203000000000010303 

01 070911 01 02020C3020 00000080C0408020C000 

C020 101 8000000000103030 10101020 30 1000000 

0000000080C850E08000D080606020300000 

50 '000000010100010205060201010100000000 

C0E0A0C0 3C006080804000008000000000000000 

0000 0001 1 01 020 201 000000068F0D3648B4O4 1 A 

00000000000000000000000000000001 01 020C08 

00000 0307868304068A09040204060 00 000 

60 '000000000000000001 01 000000000 1000000 

0000307868B04020A0404080 00800 00 00000 00 

00000000000000000000000000000000000C1E3A 

4C90C828O0B0000000000000000000003F7FFFFF 

7F3F000000000008000000FCFEFFFFFEFC8B 

70 CLEAR58 0.8.HD800: SCREEN 1 . 2 : UI DTH32 :COL 

OR 15.1 . 1 :DEFINTA-Z:KEYOFF:DIMV(223) :OEFF 

NA=V(VPEEK(6176*X*4*Q(Q)*(Y*8>«32) ) :DEFF 

NB = V(VPEEK(6288*(X*2-CI>*4*(Y*8)«32> ) :DEF 

FNC=VPEEK(6176*X*4»(Y*8>«32) :AD=&HO000 



80 FORI=0TO2:READA$:FORJ=0TO69:POKEAD*I» 
70 + J.VALC&H"*MI[>S(AS.J*>2*1.2)):NEX'rJ.I: 
DEFUSR=AD:DEFUSR1=AD*179:U=USR(0>:N=180 
90 FORI=8TO6:READA$:FORJ=0TO1 :FORK=0TO31 
:VP0KE1312*I«32*J«256*K.VAL("SH"»MID$(A$ 
. K«2*1 .2)1 :NEXTK, J . I:FORI=0TO7:VPOKE8212 
♦I.VAL("&H"*MID$("41F1616145E56565".I«2* 

1.21) :NEXT:SPRITE$(36)="S 5" 

100 = 0:11(01 = 1 :Q<1 )=-l :FORI=0TO8:S( I 1=2* 
( 1=71 ♦ 2. d-3) :NEXT:FORI=0TO63:V< 160*1 )=v 
AL ( MIO$ ( " 1 1 1 1 1 1 1 1 1 0000 01 1 222222222233344 
4".IHOD32+1 .11) ;NEXT 

110 N = N-(N<0)«(0-N) :CLS:PRINTSPC(194>"'»3 
33C « 7.V 2333t 2C TV -?!?•( 

-7D7< -*x?< -7fc--f -333-f 7.31)t -WM - 
333< -0?t1 -IIX< Oil* ^< -< -IIH ~ (O 

7-f 01 1* 01 01 01 01 01 ->*":SPC( 

45) :USING"HI-SC##»#0":N:O=0:P=3 

120 FORI=0TOl :I=-STRIG(0):NEXT:PLAY-Vl5O 

4L16EGO5C04G05CFE3"."V15O4L16CEGEGO5C04G 

3" ."O3S9M500 0L16CCCCCCCCCCCC" : IFSTICKI0) 

ANDR>100THEN140ELSERESTORE538:R=100 

130 FORI=0TO5000:NEXT:R=R+1 :READD.O$ 

140 CLS :PRINTUSING" ###av AlR7?rrTT SCOR 

E*#»#0 P:#":R;O;P:PRINT"»"STRINGS(30.180 

)"0" ; :FORI = 0TO20:PRINT'''f"SPC(30)' , -" ; :NEX 

T:PRINT"t!"STRINGS(30.186) : : VPQKE691 1 . 189 

:PUTSPRITE1 . (125.-1 ) .15.36 

150 PLAY"V1504L16FGCFGCFGCFGCFGFGFGCFGCF 

GCFGCFGFGFGCO5C3"."S1H4080O4L16FGCFGCFGC 

FGCFGFGf GCFGCFGCFGCFGFGFGC05CCCCCC" . "03S 

1M4000L16CCCCCCCCCCCCCCCCO2B-B-B-B-B-8-B 



-B-B-B- 



-A-A-A-A-A-A-A-A-A- 



160 CS = ", •?•?,?. -X3C-7-(1l*^3t-*<9I**)DI;-7 
<^It3D3777tIIX3-^7<^I*, '>?• 0-. =)1 ■ , ■ =) ■ 9. ?i • 
, >9*9, 9**, • : 9-=i>9t.-s .9'9,93'i •9-*,9**73ft fc - 
7<-7^^7<-7.f^IJt 1 ^3--75'5lDt?7'f,l»-, ■T.-I^l- 
Ot-g-f^,*, -733-77^113367*^11^. ** ••-■< ?01*t=2 
-^,'5t-'-7-f-7'f-7-f333777III^3t-7-f-7<" 



170 FORI =0TO6:FORJ=0TO2:FORK=8TD9: LOCATE 

K»3*1 ,I«3*2 + J:PRINTMIO$(C$*".-9-9. mm 

-777II" . IASC(MID$(D$.1«10*K*1 . 1 ) )-65)»9* 

J.3+1.3); :NEXTK. J.I: X=12«( 0*7*1 )-4:Y=24. 

(DP10D7*1 ):Q = -(X>32):M = 23:T = 50:A = 0:H = 

180 S=S(STICK(0)):G=STRIGI0):ONA*1GOTO19 

0.200.210.220.230.240.250.260.220.270.28 

.290.290.290 .290 

190 IFV(FNC)THENIFO=SANOFNA<2THEN20 0ELSE 

IFQ=1-STHENO=1-O:GOTO300ELSEIFGTHENA=4:G 

OTO300ELSE300ELSEONIFNC-169)t1OO32*lGOSUB 

320.370.390.410.400:UPOKE6176»X*4*(Y*8I» 

32.164-32«IY*8>=M) :GOTO300 

200 A=A+1 :X=X+Q1Q) :GOTO300 

210 A=3:X=X+O(Q1:IFGTHENA=10:H=5:GOTO300 

ELSE300 

220 X=X*Q(Q) :IFFNB>2THENA=0:GOTO300ELSEA 

=7:H=-3:GOTO300 

230 IFHTHENA=6:GOTO300ELSEA=5:GOTO300 

240 H=5:A=4:GOTO300 

250 IFHTHENA=7:GOTO300ELSEA=0:GOTO30 

260 Y=Y-H:H=H+(H>-6) : IFFNA=4THENY= I YK8 ) « 

6*4:A=1 1 :H=0:GOTO300ELSEIFFNB>2THENH»0:A 

=6:GOTO300ELSE300 

270 A=8:X=X»0(QI :GOTO300 

280 X=X*Q(0) :Y=Y-H:H=H*(H>-6) :IFFNB>2THE 

NH=0:A=9:GOTO300ELSEIFXMOD4>0ORFNA<2THEN 

300ELSEIFFNA=«THENY=(Y*8)»8*4:A=11 :H=0:G 

OTO300ELSEA=7:GOTO300 

290 A=(A*1)«-(A<14 1:Y=Y-3:X=X»0(0) :FORI= 

0TO60:NEXT:GOTO300 

300 PUTSPRITE0. IX»2-4,Y-1 ) . 1 5 . A«2*0 : T=T- 

1 •IFTTHENELSET = 50:IFrlTHENU = USR1 (M) : M = M- 1 

310 IFY*8<MTHEN180ELSEIFY*8=MTHENB=0:PUT 

SPRITE1.(125.-1).15.36:GOTO180ELSEB=B-1: 

PUTSPRITE1 . I 125*6*2.-1 ) . 1 5 . 36 : I FB = -92THE 

NGOSUB370ELSE180 
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Sf. ^x— yf- ^li^jA* 
140 A^y-^-#SS 

150 ai§ 

160-170 V-y^H* 

iBO~3io x-ryju-^ 

180 7.x -f'^ A* h'J 

#-a£ yis^v-**? 

190 p±urnst^(^i) 

^©£7E© + -f^Cc£5xr 



1$) 

200 #< 1 
210 *<E 

220 ^<3-»ftB3 

230 sny-vv^i • 3 

240 SBv>>^e 

250 llA»iyi'V7 

3-SBv>>76)-SB^ 

V>?4 

2bo rayfv^e-iiy 

270 StftBl 

280 ^iJv>V^l 

290 <£UM3 

300 7L'-l'1'-*f5ii 

310 7KS©f <'±CLi5i: 
$ 7K^CU5.tS(^mW 

320-420 tt-^U-xV 
320-360 Xx-v^'JT 7 

370-380 SEW^T.©®!) 

390 off©Jfl.II 
400 S53ffl©il 
41 0-420 SClfflSLHI 
430-600 x-£ 

430-450 yyymyny^ 

A 

460-520 /W-vyi^U 

-2x-:7JL/x— £ 



530-590 Xr-y?-$ 
600 TT-Jb^UPBfrox^E 



VS/>lSf«t8 



D000-D0B2 

REMXJTMWx-^fflg;^ 

tilffA^-VC^Lfct© 

?MA£->0~35)C*S& 

C(USRO) 

DQB3-DDD0 

7Kfa£±#£t!:3=x*7.hY 

lStitf?IIS©fi©7^->Sf* 

3(USR1 ) 



9-^XU7 



Dl 01 

n-yjjyyy 

Dl 02-D1 03 

bas i c^^y^TK^yy 



vtzt 



Dl 04 

D105-D10B 
VRAM/K-O^ 

Dl 07-D1 08 

DIOB-Dl EA 
7^7-fhyi*b-^T-7 



v y >nr\ fills' a b y x 

SLA A 

^nf@a£A;tiB'd;<(f?yx.Hl6 

1r-f&641Ih BObvX^ 
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320 PLAY"\/1504L16C03B-04CDDE-FGE6R1 ."."V 

15O4L16A-GA-B-8A-B-8O5C6"."S1I14000O3L16A 

-R8B-R16B-R8O4C":FORI=M+10TO0STEP-1:GOSU 

8420:NEXT:FORI=0TO1 : PUTSPRITEI . ( .209 ) :N 

EXT:IFR<120THENRETURN130ELSERES7ORE600 

^30 QS = "M2000CCM70 00C4f12000CM70 00C4M500C 

8":Q$="S1O3L8"*QS+Q$:FORK=0TO1:PLAY"V15O 

4L8G4.R8G05D4EE2FE4CC2V12FE4C1C" . "V1303L 

8C404C03C4.04CO3C02B403BO2B4.O3BO2BB-4O3 

B-O2B-4.O3B-O2B-A403AO2A4.O3AO2A" ,0$»0$ 

34 CLS:PLAY"V1SF2GF4.E2FG4.[>204L4A05CDC 

04B805D" . "O3F4O4F03F4.O4F03FE4O4EO3E4.04 

EO3ED4O4DO3D4.O4D030L4GFED" . QS*Q$ 

3',0 IFKTHENPLAY"E-.C.V12E-8F8G2FV15C06C1 

" ."E-1E-1E1R2" , "M6000CC4CC4CC4CC4CCC4CCC 

CCCCC"ELSEFORI=0TO99:PUTSPRITEIMOD4. (0.9 

9) . 0.0:NEXT:X=120:Y=89:FORI=1TO19:REAOA. 

O.W:X=X*Q:Y=Y-U; PUTSPRITE4- CA<34) , (X.Y) . 

8-7"<A<34).A:FORJ=0TO130:NEXTJ.I.K 

360 U=l :FORI=0TO50:PUTSPRITE4. (X*I.Y) .8. 

34-IW<0):PUTSPRITE5.(XtI*1.Y-6).15.0:Y=Y 

*U:W=W*SGN(87-Y> : FORJ=0TO99 : NEXT J . I : FOR I 

=0TO5: PUTSPRITEI . (0.209) : NEXT : LOCATE 1 2 . 1 

1 : PR INT" THE END" : FORI=0TO1 : I=-STRIG 1 ) :N 

EXT:RETURN110 

',70 PLAY"V1504L16CO-DE-EFG-G"."V1S03L16A 

B-B04CD-DE-E" : FORI = 1 5T01 6 : PUTSPRITE0 . ( X» 

2-4.Y-l).15.I»2+O:FORJ=0TO300:NEXTJ.I:P= 

P-l :FORI=0TO300B:NEXT:FORI=0TO1 

360 PUTSPRITEI. (0.209) :NEXT:IFPTHENRETUR 

N140ELSECLS: LOCATE 1 1.11 : PR INT" GAME OVER" 

:PLAY"V1504L8AAB05C04BAB80SCDC04B05C>-3" . 

"V1S03L8AA-ACFABB-B0GBA3" . "S 1 M4000L8O4FF 

FFFFGGGGGGA": FORI =0TO9999: NEXT : RE TURN 1 10 

390 0=0*4 :B=0: PUTSPRITEI .( 125.-1 ) .15.36: 

PLAY"V15L3205CC*DD+V13EFF*GV11G»AA»B";G0 

TO420 

400 0=0+7 

410 = D*2:PLAY"L3205V15CDEV13CDEV1 1CDE" 



420 0=0*1 :LOCAT£22.0:PRINTUSING"*#**0" :0 

:RETURN 

430 DATA3E 1221 0880 1 1 00383204D1 ED5305D1 3E 

201 10BD13201D17ED6304 7D60ADA23D0C603473E 

000E10800DC227D04F237ED63047D60ADA3AD0C6 

03477980231 2 1 33A0 1 D1 30C21 4D0 

440 DATA7EFE2ED250D001 080 009220201 2 10BO1 

ED5B05D12207D1012000CD5C002A07D116207E47 

1E08CB18CB171DC26CD0772315C268D02A05D101 

200009545O2A07D101 100009CO5C 

450 DATA002A05D101300009545D2A07D101 1000 

CD5C002A05D101400009545D2A02D13A04D13DC2 

08D0C92100183AF8F7012000093DC2BCD00620CD 

4A00C620CD4D002305C2C3D0C90 

460 OATA00675B3D366A5D3S2A5B5 5 55525A5A6E 

2D355A6D335E6D33AA5555555555AA00 

470 DATA7EC3ADAD81B5B581FF85A9AD81B581FF 

000000206074E64200003C183C5E7E3C 

480 DATA00000000182C3C1800003C4E4E7E7E3C 

3838FE203808180 010FEBA7C147CFE00 

40 | OATAEEEEE0EEEEEEEEEE0EEEEEE0EEEEEEEE 

F7F7F7F7F7F707F7EEEEEEEEE0FF8FFF 

50 DATA0EEEEEEE00FFFFFFF7F7F7F707FFFDFF 

BCE3E7C32AECEEEE06EADCBE7CFA76AE 

510 0ATAC3DBDBD3CBDPBE70BBD3CBDBC3FFBDFF 

FFFFFF0 0EEEEEEEE3F2F5F408CDCEEEE 

520 DATAFCF4BA4271FBF7F7FFBFFFE0EEEEEEEE 

FFFDFF07F7F7F7F7FF8DFFC3D8DBDBDB 

530 DATA6.AAJAAJHAAAA0TA0XXPALVAHAAJAAAU 

ACXPGTQTAJAAJAAORAAMAACHAAJQTWAOXXRHSXRN 

.5.KAAAAAAAALCAAUPJ0PABAaPAADAAAJBAJAAAA 

AAFQPORQPACAAAAAAAAJAABBZ02ORC0PK.63.AAA 

AJAAAAAGYQRUACAOTKNJJAAJAFLUOXCSXTFAUAJA 

AJAAAGAABADSERAAUAHGAZAZZIF 

540 DATA4 .AAAAHAAAAAAAJVGAUHAVAAMAJAVMAA 

UANIUAANAAAUOPAAAKOLYAAAQRVORMNZZZZZZZZN 

. 13.KAAADAAAALBAMAYAAHABSRNAUAOTQPAQTAWV 

AAAAVAYANSEXRUAUWAAJ J J AFVANZSXXTH I .7.AAZ 

ZLJAAAAASXTMSEERAAAKAUAAAAMSETANAOETNAAA 

ACPAAAAOXEXTSEXPJHAHHAJAAAU 



550 DATA6.LAAAAAJAAAMSEEEEXETANAJAJAJAAU 

AOTZMZYZVJVADBNP1NFAFSRAETNIAVJAAOTSXPKKU 

.6. AAAAAZZAALKOROEXTAQTVAJUAJAVAAJAVAAGA 

ABACAAAAAFAAISRJADAAJABAABAAZOTZZ.0.AAAA 

AAJAAASXEXEEXEETJAAJZAZZAASEEXTCXXXPXAHA 

AAJZHJSEXEEETSXTAAHHHHIHHL 

560 DATA4.SXTSTBAAJAMSXTAAJACANFAAJABALA 

AAJALRAAYAAAMAAAUAUABANACAOANAAZAZAZAZAZ 

.4. AJAAHAAAAAABAOTMAAAAVAAAAWAAAASRGUANA 

AAAAAAAQTAAAASRJQTBAAAAZZBZZZZZZL.6.AAAA 

JAAAAKAQTADAOXTTVKAAAAASEPOTAORGACEPAAAA 

IAaxEPAORQXROXETACZZZZZFAL 

570 DATA6.LAAHHAAAJASEETDSEETAAAAJAJAAAU 

JQETCSETSPMAAIAHAAAJNSEXEXTFABAAAAZAIAQT 

.3.AAJAAYAAAAAUMAMNAJMAVJNANAAMWGAFAAAHM 

NNABBCZCTNAIALACXPAFACASRAIA2AGAK.34.KJA 

AAAAAJAFSTADHASTAAAAGJWAAAGJUAAMNAOTACHA 

GWJAAAZBBAANFZAACASTZACTHZL 

580 DATA0. AAAAAAALAASRABAHAFAHACAHACAAAB 

AKAFAJADAAABAKADAIACAAABAAABAAZZZZZZZZZZ 

.13.XAAAAALAAABHACAADMAAABAADZANVAAQERAD 

AADAAAADAAOAJUAORAOAACPABADAZJSXTZ . -AAA 

AJAAAAJVVVVWVFUUJAAAAHAAAAUUUUUUUGUAAAA 

HAAAAAUVVVVFGFJACLAZHAJADZZ 

590 OATA0.AAAAHAJAAAUHUHUAUHUHJUAUHUHUAU 

UAUHUAUAUHAUHUAUHUAUUAUJUHUKULZUHUZUZUZU 

k.6.STLSXTCXXTAAGAAHAHAAAHAGAORFACVOERAA 

AAVAUAAAQRHAHUQEPAVOTABAAHZAZHAHZU 

600 DATA35. .3.35. .2.35. . 1 .34. .-1 .34. .-2. 

35. .1 .35.-1 .35. ..34. .-2.14,-12.-7.22,1 .1 

.24, 2, 3, 26. 2. 3. 28. 2. 3.. 2. 3.... 2. 2... 2.-1 

■ 35.-1 .-6 



< 
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The way to Returru 
©USR3IJ, lA-fh©161S 
(tU5cfc016iiS©ASCII^ 
BINARYSSO^toCSS 



(ANTARES) 




by MIJINKO-SOFT 



► iSTO Ii39^-y 



£8*0)1111* 



AS ?— $^&&&ffl 

AD Yv/lgx-^B^ 

AN$ !)§?©£? 

i , j n-ym 

K$(n) iSR&©J I S=l 

-K 

MWzffimom 

s, si, sb xcn-)\y 

mv'—poffimm 
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10 _KANJI :CLEAR200.&HBFFF:DEFINTA-Z:AD=& 

HC000:DEFUSR=AD:DEFUSR1=AD+40:DEFUSR2=34 

2:KEY1.CHR$(12)+"U=USR1 ( ) "+CHRS ( 1 3 ) :KEY 

2."_ANK:SCREEN0"+CHR$(13) : ONSTOPGOSUB1 90 

20 SCREEN! :COLOR15.4.4:WIDTH32:KEYOFF:LO 

CATE4.6:PRINT"*****«l*:i*Y* J <*V*:!*t>*'}* r »B" 

30 READAS: IFA$< >" END"THENFORI=0TOLEN ( A$ ) 

¥2-1 :POKEAD.VAL("&H"+MID$(A$,I*2+1 ,2) ) :A 

D=AD+1 :NEXT:6aTO30 

40 FORI=0TO63:S=SIN(I*ATN(1 ) /8) *96:S1 = (S 

+263)¥8MOD32:S2=(256-S)AND7:POKE&HC500+I 

*2.S1 :POKE&HC50 0+1*2+1 . S2:NEXT 

5 SCREEN5:GOSU8180:LOCATE12.9:COLOR3:PR 

INT"«tt i-t 7i":C0PY(96.144)-(159.159) ,0TO 

(96.132) .0:LINE(96.148)-(159, 159) .0.BF:C 

OLOR10:LOCATE9,10:PRINT"Push Space Key": 

C0L0R14:L0CATE7,11 : PRINT" 1 992" ; 

60 DRAW"BM1 17> 178M-21 , +1 0R1 0U5O5R2U6D6R2 

U7D7R3U8D8R4U7E1R2D8U8R2F1D7R4L1U8L1R7D7 

G1L1H1U2BU5R7L1D8L1R4U7E1R1F1D6F1R1E1U78 

R3D3G1L2R2F1D3R6U7H1L1G1D7R6BU4L1BD4R5E1 

U2H1L1H1U2E1R8D4R2L2D3G1L1H1J7R9D8U8R5D8 

U8R3D7U7R2D6U6R2D5U5R10M-21 .+10" 

70 PAINT ( 1 02. 1 87 ): PA I NT (188. 182) :SCREEN3 

:GOSUB180:LOCATE2.0:COLOR15:PRINT"*Vj;C"; 

:LOCATE0. 1 :COL0R9:PRINT"HKk.»<Q*i." ; : U = USR 

(0) :TIME=0 

80 IFSTRIG(0)THEN100 

90 IFTIME<120 0THEN80ELSEU=USR1 (0) :U=USR( 

0) :TIME=0:GOTO80 

100 U=USR1 (0) :Q=0:T!=0 

1 10 STOPOFF:SOUND8. 16: SOUND 1 1 . 0:SOUND12. 

60:SOUND0.0:GOSUB180:GOSUB170:K$(0)=Z$:F 

ORI=1T04 

120 GOSUB170:K$(I)=Z$:FORJ=0TOI-1 :IFKS(J 

)=K$(I)THENJ=4:NEXT:GOTO120ELSENEXTJ,I 

130 SA=RND( 1 )*5:AN$=K$(SA) 

140 SCREEN5:GOSUB1 80: LOCATE 1 . 9:FORI=0TO4 

:_KNJ(Z$.K$(I) ) :C0L0R7:PRINTI + 1 ; : COLOR 10 

:PRINTZ$" "; :NEXT : SCREEN3 :GOSUB1 80 : LOCAT 

E3. 1 :_KNJ(Z$.AN$) : COLOR 1 5 : PRINTZS ; :U=USR 

2(0) :U=USR(0) :STOPON:TIME=0 



150 A$=INKEYS:IFAS<"1"ORA$>"5"THEN150ELS 

EIFVAL(A$)OSA+1THENX = TIME:X = X + 300:TIME = 

X:SOUND1 ,4:SOUND13.0:GOTO150 

160 X=TIME:POKE&HC600. 1 :SOUND1 .1 : SOUND 13 

>0:COLOR9:LOCATE0.0:PRINTUSING"##.##Sb": 

X/60:T!=T!+X:Q=Q+1 :FORI=0TO1 :I=-STRIG(0) 

:NEXT: I=USR1 (0) :GOT01 10 

170 ZH=RND(-TIME)*32+48:ZL=RND(1 ) #94+33: 

IFZH*256+ZL>20307THEN170ELSEZ$=HEX$(ZH)+ 

HEX$(ZL) :RETURN 

180 VDP( 1 )=VDP( 1 1AND&HBF :RETURN 

190 U = USR1 (0) :STOPOFF: SCREEN 1 :L0CATE4.4: 

COLOR15:PRINTUSING"###*n *<*C*lt*0*9*t*** 

7»B";Q:IFQ>0THENLOCATE5.6:PRINTUSING"Ji^K 

?* A -»C**»»## . ##Sib" : T ! /Q/60 

200 PLAY"V13L6GFEFEDC2 

210 FORI=-1TO0: I=PLAY(0) :NEXT 

220 FORI=0TO1 : I=-STRIG(0) : NEXT: RETURN50 

230 DATA F3219FFD1100C8010500EDB03EC3329 

FFD2136C022A0FD2100C51100C4018000EDB0AF3 

200C6FBC9F32100C8119FFD010500EDB0FBC9F3F 

53A07004F0C21DFF37EE6F1770680ED79ED41237 

EE6E7F64877ED7904ED413E0204ED79ED41 

240 DATA 1 1AB01E3E31B7AB320F92100C406407 

E169AED79ED51237E14ED79ED5123DDE3DDE3DDE 

3DDE3ED4F10E5AF069AED79ED4104ED79ED4121D 

FF37EE6F7F606770680ED79ED41237EE6E777ED7 

904ED413E1F04ED79ED412A0 0C4E52102C41100C 

4017E00EDB0 

250 DATA E13A00C6A72805210000182F45CB20C 

B20CB207C900600FE8038040601ED4457CB3A82C 

B3FCB402002ED4457C607CB3FCB3FCB3F6F7AED4 

4E60767227EC4F1FBC30 0C8 

260 DATA END 
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1 'SAVE"SHOP.BAS" 

2 KEY7."SCREENB"*CHRS(13) 

3 CLE AR58B: SCREEN 1 . 8:COLOR15. I .1 :WI0TK32 
:KEYOFF:DEFINTA-Z:DEFDBLS:DIM( 15.21 . SS ( 
22) .nt(26) . S ( 21 ) :DATA*»L,l,i<n»..*»->L.<U.i 
»*.a-i<*.»7o* ; iU*..0i<i*o.C[).i< .tts«.OAte.;i 

*°~Vl'>UI.,lt<'.tH,1~< .li?\!t.<l*VL'*r>t!k 

4 F0RI = BT0l5:READM( I 1 : NEXT : DATA 1 B . 7 . B . 2 
B.12.1 .3B. 17.1 .4B.25. 1 .6B.38.2.18B.65.2, 
15B.88.3.228.138.5.3ee.l78.8.4eB.23B.12. 

oa b. 38a. 17, ieaa.60B.23.2aaa.i2Ba.3a.4BBa 
.23aa.38.6aaa.3sae.47.9aaa.46BB.57 

5 F0RI=BT015:F0RJ=BT02:READI( I . J) :NEXT:N 
EXT:DATA«tl , ).LUIlJ.U»*4.tH"M . »u*»» . BA.7»li . 
OTtr*.7'"-9.:/X7&.-i:/C'"I 5BBBB.f»n , -l'5BB8B 
8:F0RI=16T026:READMI< I ) :NEXT 

6 DATA1 .7FFFFFFBEFEFEFEE.2.FCFEFE1EEEEEE 
EEE.3.FFFFFFeaFFFFFFBB.4.FFFFFFBBEFEFEFE 
E.5.EFEFEFFBFFFF7Fee.6.EEEEEElEFEFEFC7. 
EEEEEEEEEEEEEEEE.8.EFEFEF88FFFFFF88 

7 0ATA96.e8e4B61 SI 86828. 1 B4 . BB7E3C7E7E7E 
7E.l12.eB7E7E7E6A567E.lB5.Be7E427E7E7E7E 
.H3.Be6B6262626A6A. 1 B6 . BB 1 8BB3C3C3C3C . 9 
7.aeBA44287C38. 1 1 4 . BB 1 83C66663C1 8 . 1B7.BB 
E7FF3C3C3C3C. 1 1 5 . BB7E42427E5A7E . 98 

6 DATAE81CB2FF83AB83FF.1B8.3C7EBDDBDBBD7 
E3C.99.FF8989FF81FF81FF. 1 1 6 . 3C66C381 81 C3 
663C.1BB.3C76FFF0F0FF7E3C.12B.FF8 1999989 
BD81FF.48.Baaa7CEEEEEE7C.81 .51 .Al .FC 

I F0RI=128T0464:I=I-(I=256)«128:V=VPEEK( 
1) :VPOKEI .VORV¥2ORV*4:NEXT:F0RI=aT024:RE 
ADA.AI:F0RJ=BT07:VP0KEA«8tJ,VAL("SH"-H1ID 
S( AS . J«2+ 1.2)1 :NEXT: NEXT: FORI =BT03 

IB READAt:VPOKE82B4»I.VAL("SH"tAI> :NEXT 

I I POKESHF3B1 . 25 : CLS : PRINT'S************ 
*******************": :F0RI = 1T022:PRINT"Et 
'SPC(141"B"SPC(15I"B-: :NEXT 

12 PRINT"!**************?*************** 
i":CHRI(11):P0KE&HF3Bl.24 

13 FORI = 1T03: RE ADAS: LOCATE 16. I :PRINTAS:N 
EXT:DATA"i— . x T i— i t— .-.•"— , M I I \r 

14 F0RI=BT01 :VPOKE8198H . 49 : VP0KE81 94* I . 
113:NEXT:Et=CHRt (27) »"Y": PRINTEI" 'lOPUSH 

SPACE!":G0SUB15:PRINTE$"' 1»":SPRITEI(e> 
="~»»»»»»~":A=RND(-TIME> :G0T024 

15 IFSTRIG(a)THENG0SUB19:RETURNELSEl5 

16 FORI"6T022:LOCATE16.I:PRINTSPC(15> :NE 
XT:RETURN 

17 GOSUB22:FORl=8TOCC:LOCATE17.7*I : PRINT 
"0"tMl(Ct1*I) :NEXT:PRINTEI"'1«" :C=B 

18 S=STICK(8> :IFSM0D4< >1THENIFSTRIGIB)TH 
ENGOSUB21 :G0SUB19:RETURNELSEIFINKEYI=CHR 
K13)THENC=-1 :G0SUB19:RETURNELSE18ELSEC1 
= C*(S"5)«<C<CC)-(S»1)»(OB) : LOCATE 1 7. 7»C 

:PRINT"o":C = C1 : LOCATE 1 7. 7*C: PRINT"*": GOT 
018 

19 S0UND8.15:S0UN06.31 : SOUND 1 . 8:F0RI"BT0 
255STEP16:SOUNDB. I : SOUND7 . 7- ( IM0032= 1 6 ) » 
49 : NEXT: SOUNDS. B: RE TURN 

21 F0RI=BT0VAL(MIDI<"B3B921",S<2>»2»1 .21 
) : LOCATE 1 . UI:PRINTSlt I 1 : NEXT : LOCATE 1 . 14 
1 : PRINT'**************" :: RETURN 

21 F0RI=8T0CC:IFI=CTHENNEXT:RETURNELSEL0 
CATE16.7U :PRINTSPC( 151 : NEXT: RETURN 

22 S<8 )=S IB) -(999999! -SI B) )»<S(8) >999999 
! ) :PRINTE$"*8"USING"LL*ii#*#««.»t$]";S(B 
) :RETURN 

23 IFINKEYK >""THEN23ELSERETURN 



24 S(a)=ieBe:S(l>=e:Sl2)=B:SI3)=15B:Sl4) 
= 1 :S(5)=8:Sl6)=2B:S(7)=B:S18)=e:F0RI = BT0 
21:SICI)«STRING1(14.254> : NEXT : S$ ( 22 ) =STR 
INGK16.48) :E=8:G0SUB2B 

25 PRINTEI" 11 "USING" t»h/t»#*#»:J" :S ( 81*1 2* 
1 .S(8)MOD12*l :G0SUB23:G0SUB16:CM=16:CC=8 
:G0SUB17:G0SUB23 

26 IFC=-1THEN25ELSE0NCG0T028.37.42.58.55 
.68.63,67 

27 G0T071 

28 GOSUB16:FORI=8T015:LOCATE27.7»I: PRINT 
USING" #**#"; 1(1 .1 ) :NEXT:Ct1=8:CC=15:PRINT 
EJ"&U**tU>ll5? U>Ht!":GOSUB17:IFC=-lTHEN2 
5ELSEIFMIDS(S$(22).C*1.1)="1"THENX = 8:Y = 8 
ELSE35 

29 MY=VAL(MI0I("83e921".S(2>»2»1 .2)1 

3e S=STICK(8):X = XMS = S)»(X<13)-(S=7>»(X> 
8>:Y=Y+(S=5)«(Y<MY]-(S=1>»(Y>B) 

31 PUTSPRITEB. <X«8*8.Y»8*7) . 14. B: IFSTRIG 
(e)THEN33ELSEIFINKEYI=CHRS(13)THENG0SUBl 
9: PUTSPRITEB. (8.2B9) :G0T071 

32 GOT03B 

33 IFSIBXI (C.I lORMIDKSKY) . X» 1 . 1 ) <>"«!" 
THEN3BELSES(fl)=S(B)-I(C.1 > : AI=MIDI ( " " hp i 
q)arksblctdx".C*1.1) :LOCATEX+1 . Y*1 : PRINT 
At: MIDI (SKY) .Xtl .1 )=At:G0SUB22 

34 S(1 )=S( 1 >*1 :G0T03B 

35 GOSUB16:PRINTEl" ' 1 »Of< irL-TfJtrH. "E J" ) 
lopuSH SPACE I" :GOSUB1 5: PRINTEI" >1»" 

36 G0T028 

57 G0SUB16:PRINTE$"'lUxi , '4":X = B:Y = B:MY = V 
AL(MID$("B38921".S(2I«2*1.2)) 

38 S=STICK(8) :X=X*(S-3)»IX<13)-(S=7)»(X> 
B):Y=Yt(S=5)«(Y<MY)-(S=l)»(Y>8) 

39 PUTSPRITEB. ( X«8*8 . Y»8t7) . 1 4 . B : IFSTRIG 
(8)THEN41ELSEIFINKEYt=CHRI(13)THENG0SUBl 
9:PUTSPRITEB. (B.289) :GOT025 

4B GOT038 

41 IFMIOKSKY) . X*l .1 X >"*"THENLOCATEXt1 
. Ytl :PRINT"»":MID$(S$( Y) .Xtl .1 I ="*" :G0SU 
B22:S(1)=S(1 1-1 :G0T038ELSE38 

42 GOSUB16:CM = B:CC=15:PRINTEI"S1i*J>»UC*t 
t»i"7":GOSU817:IFC=-lTHEN25 

4 3 G0SUB16:IFMD1(SI(22) .Ctl ,1 )="1"THEN4 
6ELSEIFS(4XI(C.2)THEN48ELSEIFS(4) >RND(1 
)«I(C.2)«1BTHENPRINTE$"'1l!uciLS!"ES"(2;ll 
»«ll,J«)»t<7 , "E$")1"M$(C)"t"E$"»4«0»SS»! ! !" 
:PRINTE$". lOPUSH SPACE!"ELSE48 

^4 MIDKSK22) .Ct1 ,1)="1":G0SUB15 

45 PRINTEI". 1»" :G0SUB16:G0T071 

46 PRINTE$" , 1*7*CMA.7*DH." : PRINTEI" 1 lOP 
USH SPACE!":GOSUB15:PRINTEI")l»" 

47 G0SUB16:G0T025 

48 PRINTEI" •1»0L»»'*I1IJ»U(17"E$" (2<(Ue47"l, 
E."EJ"«10PUSM SPACE!":GOSUB15 

49 PRINTE$"»1»" :G0SU816:G0T071 

5 8 G0SUB16: IFS(2)=2THENPRINTES"'Ut!l>l>J; , » 
l)l.t!tt"E$"(2»'>it<l.":PRINTE$"«10PUSH SPACE! 
":GOSUB15:PRINTE$"»l»":GOT025 

51 PRINTEt"J1t*«)*ei;»l.'fi»i7":Cn=25*S(2) : 
CC=1-S(2) :GOSUB17 

IFC=-1THEN25ELSEC=C*S(2I 

53 IF(C=BANDS(e)<5B8BB! ) OR ( C= 1 ANDS ( 8 )< SB 
8888! )THENPRINTE$"t2L^#»£1St'4" :PRINTE$" 
-lOPUSH SPACE!" :GOSUB15:PRINTE$"-l«":GOT 
025ELSEIFC=8THENS(B)=S(B)-5BBeB!ELSES(B) 
=S(B)-5BBB88! 

54 S(2)=C»1 :PRINTE$"+2»of»}l»!":GOSUB2e: 
PRINTE$"-10PUSH SPACE!":GOSUB15:PRINTES" 
-l»":GOT025 

r : G0SUB16:PRINTE$" ' 1 USAf t »(l(i"lt"E$" ( 2n«V 
itff?"E$"*9 18B$":C=1 

*S3yj.'irC*5? L iv*-7 : 7^ r iJCHR$(254)TT- 



56 S = STICK(8) :IFSMOD4< >1 THEN IFSTRIG ( 8 1 TH 
ENGOSUB19ELSEIFINKEY$=CHR$(13)THENGOSUBl 
9:GOT025ELSE56ELSEC = C»(S=1 1 « ( C< 1 88 1 - (S = 5 
IXOll :PRINTE$"»8"USING"*t*e8$":C:GOT05 
6 

57 IFS(B)<C«18BTHENPRINTE$".2L»48"'Ii')il»4" 
:PRINTE$"/loPUSH SPACE ! " : GOSUBl 5 : PRINTES 
"/1»":G0T025ELSES(3)=S(3)«C«5:S(3)=S(3)- 
(5BB-SI3) )»(S(3) >5BB) 

58 S(B)=S(B)-C»1B8:PRINTE$" . 8" USING" iilia 
titUa^E." ;S(3) : PRINTEI"/ lOPUSH SPACE !":G 
0SUB15 

59 PRINTEI"/1«":GOT025 

OB PRINTEI"41t)')I)'*'nf»»T"EI" , BSPACEt(iL7< 
IS»JU." 

61 S=STICK(B):SI7)=S(7)+(S=1)«(S(7)<9)-( 
S = 5)»(S(7) >8) : PRINTEI") 1 "US ING" MU'S-n 

#e«":S(7) :IFSTRIG(B)=BTHEN61 

62 G0SUB19:G0TO25 

63 G0SUB16:PRINTEI"( 1 "USING^IHH-i •» 
t";S(1) :PRINTEI") 1»« -MIDI!" SMU*t! 

DiC»Z T"11 , -I'".S(2)«H«1.H):EI"»1" 

USING"Si7»*,;i.(f ##*";S(3) 

04 PRINTE1"*1"USING"LV **#«t«" :S ( 4 ) : 

PRINTES".1"USING"EXP ##ttt»":S(5) :PRI 

NTEI"-1"USING"NEXT *#»##«"; S (6 ): PRINTE 

$".rusiNG"i)iit»e')'3 #ex";s(7i 

65 S(9)=B:F0RI=8T011 : S ( 9 I =S ( 9 ) »S ( 1 8* I 1 : N 
EXT: PRINTE t"/lhi»4?9i1Jlt-"EI"B7"USING"i« 
#####" :S 19) : PRINTEI" 2 lOPUSH SPACE !":G0SU 
B15:PRINTEI"21»":IFETHENRETURN 

66 GOT025 

67 G0SUB16:PRINTEI"'U1]=SAVE"EI"(H2]«L 
OAD"; :Al = INPUTI(l ) 

68 IFAI=CHRI(13)THEN25ELSEIFAI="2"THEN78 
ELSEIFAK >"1"THEN67 

69 OPEN"SHOP. DAT"F0ROUTPUTAS#1 :F0RI=BT02 
1 :PRINT#1 .Sill : NEXT: FORI =8T022: PR INT#1 ,S 
1(1) : NEXT: CLOSE :GOT025 

7B 0PEN"SH0P.DAT"FORINPUTAS#1 :F0RI=BT021 
UNPUTtl .S(I) : NEXT: FOR I = BT022: INPUT* 1 .SI 
(I) : NEXT :GOSUB2fl:GOSUB22: CLOSE :GOT025 

71 IFS(3XleTHEN82 

72 G0SU816:S1=B: PRINTEI"' IkHtO^uTult . .": 
F0RI=8T0S(3)*le*S(7)«1B 

73 X=RND(1 )«14:Y=RND(1 )«22:Ct=MIDI(SI( Y ) 
.Xtl .1 ) :IFCt<"'"ORCI»"*"THEN75 

74 C=INSTR("hpiqJarksbUtdx".C!):C=I(C.B 
)-(I(C.e)«S(7)/lB):S(B)=S(B)*C:Sl=S1tC:M 
ID1(SI(Y).X<-1 .!)="«" :G0SUB22: LOCATE UX.l 
♦Y:PRINT" ":S(1 )=S(1 )-1 

75NEXT:S(B)=S(B)-!(S(2)»5)-2-(S(2)=8)»5 
) :S(1B«(S(8)M0012) )=S1 :IFS(BX8THEN83ELS 
ES(5)»S(5)4S1/1»: IFS (5XS (61THEN77 

76 S(*)=SI4)-(S(4X99):SI5)=S(5)-S(6):S( 
6)=S(6)»1 .1 :S(6)=S (6)- (999999! -S(6) )«(S( 
6) >999999! ) : PRINTEI" ) 1 l^*ll.?v7° 
r7 G0SUB22:S(8)=S(8)»1 :S (3) =S (3 ) -RND( 1 ) : 
PRINTEI"* lOPUSH SPACE!" : G0SUB1 5 : PRINTEI" 
*!•": IFS18X24BTHEN25ELSEG0SUB16 

5 PRINTEI" 128h*.»-t»'" ?■)"£!" <1*M(»*UUa 
iLIE'EI" ) l«-jtt*TlttLti" 

70 PRINTEt"+10PUSH SPACE!":G0SUB15:PRINT 
Et"tl»":E=1 :G0SUB63 

8B PRINTEI"34THE END":G0SUB19 

81 FORI=BTO3BBBB:NEXT:G0SUB15:RUN- 

62 G0SUB1 6: PRINTEI" ' 1 *S»< Jiff* 6" lit" EI" ( 1; 

8<ST7"EI")4CimLI£."EI"»3GAflE OVER" :G0SUB 

15: RUN 

B3 G0SUB16 : PRINTEI" ' US»Mr»TEUU4t* "EI" ( It 

»^1j^lp»"Et")4llS*»eA.."EI"«3GAnE OVER":G0S 

UB15:RUN 
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mzwnm 



' u-TMM 

C$(n) =i-7ffig 

D(n) zi-Xx-^ 

F, KA LA RA LL V. 
W, WA X, XO, XX, Y, 

YO, YY, Z, Z0--O- 

T(n) n-7.2d:©»SlB 

it 

BT lJ!L<fc£$©^YA 

j(n) mmcDmm 

l mmncwmR 

o, v x>v>®gtxe 

x e«©x»i©S7?ffl 

FNA(n) zi-Xx-S'© 

FNB(n) AU^hf-^ 

©IXOttibffl 

A. A$. B, D. E, K 

cs =1-7. ©s^ 

I , J JU-7ffl 

s T^-r^Atlffl 

ST ffflUrUS7r<'> 

T WAltlffl 

U -7^>f§0D¥tffc*Uffl 

VA Xf-f'^th'J^f- 

©tKf§£S?rr-£VR AM7 K 
U7. 



vuv=5unm 



10—40 «i»m:£ 

5Q V^Vli©*^^ 

BQ g=l-7,©RS§eiS£ti* 

70 REM 



80 v^vfgro^-^iUT 7 ^ 

90-100 COSHtf /d© 
110 *ItI@ffl6(Z)f-7 
120 g=l-7fflgr'-^£Ijs 

c 

130 REM 

140 SCREENBC^S 

150 =l-7.7 1 '-5'©i3c&ffi l O 

160-190 ^-^f-^frfea 

POO a-7©J!9C§£ffi< 

210 REM 

220 SCREENBCIS^ 

230 zi-XilBS^S^ 

240 Xxf^ATJ/BUl^ 



vtzt 



250 

270 

280 
290 



3-7. MWI 
*-A7J 

IB^iJICZI-T-t-'-^^A 



REM 

SCREEN 1 C1SS/ 
VDP£SCREEN2C^M 
300 *l'7^?/W->Si 
/7^Yh;W->£R 
3I0 KU<vh©*g;E 
320 X'^te-v1S©S^ 
330 VRAM^^x5d;5lc 
VZ/mWE- Kffl©A'-7£ 

REM 

350-360 mnmik 

370 zi-7©*^ 
380 MJ#-A7^*5 
390 *—JVy77f i J7 

lit 
410 REM 

430 +-AMi5VRAM 

440 BWt®W)<tmmmm 

450 zT-Jl/YVWe 

460 ^YA^ig^U-rS^/ 



WWUI^I 



©13. S^CDl2Hffl©c:5 
rut. fXK?l/-fB# 

DurusgutcRisa 
i>*ot. SKB\ a*s 
r Mind=fc£Sj<!:Uc>ffl£ 

mmmm zm-wwt 




470-490 rJ-JUWil®! 

500 sane 

510 Xtf-K^-^-fflS^ 

520 HJt!t©ilS 

530 =f-Jl/Y>&©*-A7J 

we 

540 REM 

550-560 y-A*?7$Ki 

570 REM 

580 l^— SKI 

590 REM 

600-670 V^VlifflT 1 -^ 

680 D-7©g«?g 

690-770 a-Xf-5 

780 mwmnimm 



vs/>l§#18 



C400-C40E 
v>>7x-7'JL/ 
C40F-C4 1 B 
a-X?-^©7 K b7£S5£ 
C41 9-C51 2 
iSilVRAMCzi-TsfcfiK 
C51 3-C51 E 
ISilVRAMfrBVRAM"^ 

m 

C51F-C52D 

C0S©iI£>R<»3 

C5EE-C543 

n-7.x— S'ro^o^u 

C544-C56F 

=l-7A-^£3t^fflCgjg 

C570-C5CB 

VRAMOtJiHt; 

C5CC-C76G 



g$l©^« 



9-^x'JT 7 



CG00-C001 

xmm 

COO2-C003 

ymm 

C0G4 

C0O5 

g$£©[q]$ 

C00B 

Jt;t£>SgSI 

CGO7-C0OB 

tK¥*!©YM1 

COGB 

SS©t§^ 

C00C 

H[S©iii 

COOE 

C02G-C0E1 
n-7x-^7KU7 
COBO-C1 7F 

cosh©a-7';u 

C200-C2FF 

C300-C3FF 

Siitt3®ffle©A-7'JL/ 



MS 



S»©a^*6S"r-KJt©P/r 
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U< T-9%mDiii?£&C 
ISffl-rSCOSCDHt, 35bfr 

©x-^isottiur <■§><, ii 
moiitsnsfcsrx dm©h 

cap oru< ztr, 3D©=] 

Jl/S5*<fie^3tri!*Cffli 
SL/rnSo C300Hfrt>© 



©eoiiic?— S'tfxnbnr 
l^5o L/fctforsc^s^ite 




TKREE-D .FD6 



IB CLEAR288.SHC888:MAXFILES=2:0PEN"GRP:" 

A5*l 

28 DEFINTA-Z:DIMD(21B6) , J I 19 I . T < 1 1 J . C$ ( 1 

1) 

311 DEFFNA1B1=ASC(MID$(AS.B.1 > >"64:DEFFNB 

(A)=(VAL(MID$(C$(CS) .A.1 1 ] «I *VAL (MI DJ. I CS 

(CS) .A+3.1 ) )»J)*7 

48 A=&HC4B8:DEFUSR=A:DEFUSR1=A«3:DEFUSR2 

=A+6:DEFUSR3=A*9:DEFUSR4=A-12 

5B FORI =8T07:READA$: FOR J«1T0LEN(A$)STEP2 

:P0KEA.VAL("&H"»M1D$IA$. J. 2 I ) :A=A<1 :NEXT 

J.I 

OB 0NERRORGOTO58B:OPEN"*30D*TIME .DAT"FOR 

INPUTAS#2:ONERR0RG0T0B:F0RI=BT011 : INPUT# 

2.T(I):NEXT:CLOSE*2 

79 . 



. (C0S(I« 



SB A = &HC8BB:P0KEA*6.35:P0I'EA»11.2:P0KEA4 

12.32:P0KEA*14,6 

98 E=A<128:FORI=BT0255:POKEE*I . 

24544 )»1 27*256 )M0D256:NEXT 

IBB E=A+512:F0RI=BT06B:P0KEE-U.488/(I<2> 

:NEXT 

1 18 P0KEA*768.4H99:E=A»769:FORI=BTO48: J = 

1*1 :K»I NT (1/2.3) :P0KEE«J.34«K*2»(KM0D2)t 

(K«)«16:K=INTU/4»5) : POKEE* J»l .34*K*2* I 

KM0D2)t(K*2)«16:NEXT 

,^I=«T08:READC*(I) :NEXT 
13B ■»■■»«■•"«"■•"»•■•»»■"»»»»"••»•»" 
14B SCREEN8.B: COLOR. B.8:SETPAGE1 .1 : SCREE 
N.8:CLS 

158 F0RJ=8T08:READA$:LINE(XX»18.YY)-STEP 
14.71 .255. BF: FORI =1T0LEN(A$> -3STEP4 
168 F=FNA(I)»64: I FF = 49THEN I = I » 1 
178 X=FNA(I> :Y=FNAII*1 I : Z=FNA( I »2 ) »1 28 : W 
=FNA(I«3) :Z=Z*(UAND32)»2:IFF=49THEN198 
188 U!=(UAN031)/3:U=XX-U!/2:V=YY-U!/2:R! 
= SQR( (X-X8) A 2*(Y-Y8)"2)*. 1 : FORL ! =8T01 STE 
Pl/R! :K1=1-L1 :UINE(X0«K!»X»L!«U.Y8»K1*Y» 
L!»V)-STEP(W!.U!).IZ8«K!-Z»L!>.BF:NEXT 

Kf'X: rB=Y:Z8=Z 

SI NEXT:LINE(XX.YY)-STEP(63.631.255.B:X 
XMXX + 64) 1100256 : YY=YY- ( XX=8 ) «64 : NEXT^ 

228 SCREEN8.8:CDL0R242 

C0PY1 (CSM0D4>«64. ( CS*4 ) «64 I -STEP ( 63 . 
63) .1 TO (96. 58) ,8:LINEI8. 128) -(255.211) .8 
. BF: DRAW" BM IBB. 148": PRINT* 1 , "D-X" ; CS-H : 
RAW" BM 188. 168" :PRINTtl ,"Jl>^^*3<" :TICS) :C 
0PY( 88.1481-1281 ,178). BTO (79. 148) .8. TPSE 
T 

24B S=STICK(B)*STICK(1>»STICK(2):IFS=1AN 
DT(CSK4999THENST = 3:G0T0278 

1FS>1THENCS=(CS»SGN(5-S) ♦9)11009: GOTO 
238 

26B F0RST=8T02:IFSTRIG(ST)=BTHENNEXT:G0T 
024B 

0PY( 96. SB I -STEP 1 63. 63) .BTOD 
288 ■•■■««»■■««»«■«•«»■•■»•■•■*■"■ ■"■ 
29B SCREEN1 . 8.B:UIDTH32:KEY0FF:VDP(8)=VD 
PIB)0R2:V0P(4>=3:VDP(3)=25S:VDP(11 1=8 
3BB U=USR4(B) :F0RI=SH34B8T0SH34B7:VP0KEI 
, 178 : VPOKE 1*8. 8 : NEXT: SPRITES! B)=CHR$( 255 
I 



m 3D3-X£^©tt*B» 




31 B F0RI=BT07: J =7- I : COLOR= ( I «2. FNB( 1 ) . FN 

B(2) .FNB(3) I :NEXT:C0L0R=(18.7.8.8) :FORI= 

BT03:C0L0R=(15-I.I«4,I*4.I»4) :NEXT 

328 LOCATE2. 18. 8: PR INT" SPEED": LOCATE 4. 28 

: PRINT-LAP TIME": LOCATE 12. 22: PR INT" TIME 

338 P0KESHFAFC.P£EK(SHFAFC)0R8:IFST = 3THE 

NBL0AD"«DD*"*CHRS(CS»65)*".BIN".S 

358 T=B:8T=8:L=B:VA=16384 

368 REST0RE78B:F0RI=8T019:READJ(I) :NEXT: 

J(2)=(PEEK(VARPTR(D(2I ) *275 ) AND1 27) «256* 

2588 

378 U=USR1(VARPTR(D12)))*USR3(VARPTR(J(B 

)) )»USR(8)»USR2(B) 

388 IFST<3ANDSTRIG(ST)=BTHEN38B 

398 IFINKEYSO""THEN39B 

488 SOUND9. 1S:S0UNB18. 15 

418 * = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 

428 IFTIME(7THEN42BELSETIME=B 

438 1FST<3THENJ(14)=STICK(ST)-STRIG(ST)» 

16:VP0KEVA. J I 1 4 I ELSE J ( 1 4 I =VPEEK ( VA ) 

44 B X = J(B):U = USRHVARPTR(D!2) ) I-USR3IVAR 

PTRI J (8) ) )tUSR(8)»USR2lB> 

i r .8 IFL = 3THEN58fl 

468 T = T'1 : LOCATE 16. 22 : PRINTT : VA=VA* 1 :IFT 

>9999THEN55B 

478 IFJd ) >2888THEN58B 

4 8B IFX=<5B88ANDJ(B) >5BBBTHENLOCATEL«5» 1 

4.2B:PRINTT-BT:BT=T:L=L»1 : IFL=3THENBEEP 

498 IFX>5B88AN0J(8)<=588BTHENJ(8)=X:J(4) 

= B 

58B V=J(4)*16:0=248B-V:SOUND2.0MOD256:SO 

UND3.0*256»5: 0=2388- V : SOUND4 .OMOD256 : SOU 

NDS.0«56«5 

51 8 L0CATE2.17:0 = W75:PRINTSTRING$(0.128 

);STRING$(28-0.129) 

528 PUTSPRITE8. (B. 1 28- J ( 2 ) *256 ) .18.8 

538 IFINKEY$< >CHRS(27)ANDSTRIG13)*STRIG( 

4)=BTHEN42B 

BEEP:IFT<T(CS)ANDL=3THENBSAVE"»30DK" 
♦CHR$(65*CS)*".BIN" ,16384.VA.S:T(CS)=T:0 
PEN"¥3DD*TIME.DAT"F0ROUTPUTAS#2:FORI=BT0 
11:PRINT#2.T(I):NEXT:CL0SE*2 
5oB GOTO 22B 
5 78 •============================-=== 

=SS IFERR< >7BTHENPRINT"J3< S LiS» Lit.": 

CL0SE»2:_MKDIR("*30D"1 :OPEN"«DD*TIME . DA 

T"FOROUTPUTAS»2:FORI=BT011 : PRINT»2 . 4999 : 

NEXT:CLOSE#2:RESUME68ELSEPRINT"=<V*'7f tv 

1LT<»»J0":RESUME6B 

598 ■================================ 

618 DATAC319C4C38FC4C313C5C3CCC5C37BC523 
235E2356ED532BC8C93ABCCB47118BC8ED5389CB 
C53AB5CBCD1FC5ED4318C8D64BC01FC5ED431ACB 
2ABBCB22BFCB2A82C82211CBAF3213CB2188BB22 
1CCB3A81C8573AB3C85FC02EC53217C82ABFC8ED 
4B18C8B95422BFC82A1 1 C8ED4B1 AC8895C221 1 

DATAC8CD2EC52A17C83217C84F953B82E044 
UB1C3218ECBBE38B1133A13C88726BB6F197E88 
3A84C8912A13C8268BB188C28946CB7F2BB4EDC1 
18B8ED44EDC1EB21B888B7ED527DCB2C1FCB2C1F 
CB2C1FCB2C1F6FED4BB7C8B9CB7C282B7DED4B1C 
C8B7ED42CB7C28B647D947C044C5D978321CCB 

DATA3A13C83C3213C82186C8BEC25CC4B68e 
3AeeC3B8CD44C53A89CaC6e83289C8218 5C83A8B 



CB8677C1B5C224C4C911BB2B21B8C8B1B81BC35C 

BB6F26BB118BCB194E868BCB79C885C9268B6B29 

29292929295A168819ED5B28CB197EE67FC92A89 

CB3A1CCB98C8584F7BCB3FCB3FCB3F84677BE6 

63B DATAB757856F3E889247B81 1 F88B7723BDC8 

1BFA19B6B818F521B88al1BBC8B18BB8CD598821 

BBleCD53BB3AB7Be4F26C87E47CB3FB8ED7923CB 

5C2BF4218BBBC053B83E5511FFBFE079B71BC87A 

28F8218818CD53BB86e2ED692C2BFBieF921BB3B 

CD53BB86B87DE686BFC6BCED792C2BF51BF3C9 

648 DATA23235E2356EBE51161C7812ABBEDB82A 

69C7E5ED4B79C7CD36C7EBE1B7ED52E05B75C7B7 

ED52CB7C28B321BB883A7DC7E6F81 188BBB72884 

ED5B71C719CB7C28B2267FE52A6DC7ED4B87C7CD 

36C7C189CB7C28B268692269C73A70C7E6BF118B 

BBFE832B84ED5B77C7FE872B87E05B77C7CD2C 

658 DATAC72A6FC7191 1 BBBB7CB528BBED5B77C7 

CB7C2B83CD2CC7CB2ACB1B19226FC7E05B67C719 

2267C77CCD1FC5D62B32B5C82A6AC7268BC036C7 

2929ED5B61C7D51 92261 C73A68C7D648CD1 FC52A 

6AC7268BCD36C72929ED5B63C705192263C73A62 

C7575CC02EC52 1 7BC7862 1 66C7BEE 1 D 1 388DED 

668 DATA5361C72263C721BB882269C72A61C754 

22B8CB2A63C75C22B2CBCD2EC5F5473A66C79B26 

BB6FED5B7FC7CDE631ED5B81C7B7ED52E52A6DC7 

ED4B83C7CD36C7EBE1B7ED52ED5B6DC719226DC7 

ED5B65C719F1C682BC38B1672265C77C32B4CB2A 

85C7ED4B6DC7CD36C71 1 4888 1 92287C8D121 61 

678 DATAC7B12A8BEDBBC9E521B88B87ED52EBE1 

C9AFCB7C28BAC5EB21BBBBB7ED523CC1CB7828BB 

E521BBBBB7ED42444DE13CEDC36C631FD8EB2181 

BBED52C9 

688 0ATA237748. 237748. 237748. 857741 .8577 

41 . 137777. 237777. BB8777 . 23774B 

69B DATAlND"N«D A NLF"NgL"NsS-N9TFNsT"N I TG 

NsU A NsJ A NP9 A Nhm A NZm"NO! A NHa A NEX A NEM A NIG A 

NMD A M8 

788 DATAlRDTIdCGIPUTIsVTItCTIplTinNiHCT 

IGVelLITIJDTIQDTGB 

718 0ATA1PDTJJFTJENTJGTTJMUTj:UmJ9Uf JmUc 

FaC A J-_ A Jmd A J]drJQdmJL9CjLp A JPsXJYsTj:nT 

JIPTE'NTJfNTJaNTJtKNJtFKJpDKJQDTFe 

72B 0ATA1PCbI*EFIaIQIcMVIcS*I"Y*l'*aI iSt 

ImUtIfctI]dmI A leISmXISfTIN3TIMUTISVTIlSc 

UIS*zITVUIQN(JIJIUIOCbG8 

736 DATAUDTHCDJH.HQH TFbcTHtcTHz - TH ! CT 

H<UUHvSYHrUtHat_Htt]cHkZbHkL'HhJ_Hl!MaHeao 

H1efmHcmiH A - HXmTHWfTHW(]TKTNTHPPTHLKTHHK 

THCGTHCDTHIDTGB 

74 8 DATAIaCgGKCpGEHwGCPSdCCKdPNLhX.LhUSH 

hSeAh'KHc i YHactH['oHZZmH-UhHk_THpvKHlco 

JD/eTHC'PDtJTGgCHGRCgJB 

75B DATAIPDdFtCFkFIKrFIRzFHXzFO'rFH-rFLKr 

FPahFS*qFVb<FClfIf A bBf ]h"F JowFawr Fh<oFo<k 

FuykFyufFj jTFzbTFlxkOlxkOf IzaTFvKTFoYTFh 

YTFb]TF A VTF*NkF*GWFUD*FQDdFB 

76B DATA10ETFFJ A FCScFIWhF0XhFSZoKS'hKMb[ 

FIjpKLorKUjkKCm'KXuaJUy9J]"dJvlTFxaTFo A h 

Fe A eF A CTY A PTFtSTFxMTFrFTFPETFB 

778 DATAUDSGPDcGJGkGEaoGH*xGN"39 A aJylaO 

gyeJglmFgluBgu! <G I. L A 9 bOgSvagtkSgahagk hA 

9tjsGvpmGsvhGnvdGJscKJ A rEe¥rGeV>GeOA9eH: 

GXHxGXSr0oShGnSrGySYGr-[TGmCGE*DTG8 

78B DATA5881 .12B8.B.B.8.B.8.B.1580.8.7B8 

.158.9.2.8.5888.378.25.8.-268 
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^©Zi=b*lia)3(i:tffi?SBASIC(Z)«tlEfc^^^o a— tF 
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n 



rvXjBEWo 



m&m 




^i:^oS^ 



FM / Vj<P\z <£§/ \OX~d.-'J 



(E&l»~FOE~ 



tt*6Ll\f^. r FMA-^lCcfc3A0X5zL 

-^^©^n-^/i^Eozrr^ffiCtr 

g©^t>DH)icemtfSor, uxaica* 
n-^ • 5a.— y>y^©s* v 65*<jatir 

LIS, Affile, ^B0YMO~«Bi?WE©» 



KASOUTEKI -FOE- 



20 .MUSICd .0,1.1.1.1.1.1) 

39 '■ ■ COMPOSED BY GANP 

40 CIEAR3000:DEFSTRA-W:DIMXX(15) 

- .! FORX=0TO15:READW:XX(X)=VAL<"SH"tW) :NE 

XT:_VOICECOPY(XX.S63) :T="T128" 

60 P0KESHFA4C.48:P0KE8HFA7C.48:S0UND7.49 

:SOUND6.0 

70 DATA 0.0.0.0.0.12.0.0.B9E3.FFB3.0.0.4 

061 .FF75.0.0 

80 ' MML DATA 

90 PLAY#2.T.T.T.T.T.T.T.T.T 

100 PLAY#2 . "363V 1 0L 1 6" . "363L 1 6" . "363V9L 1 

6"."B63V1102L16Q6" . "05" . "05" . "V2BA1 5Y22. 

64Y23.255"."L32" 

110 A1="QA8Q4AAAA0A804AAQA8A8Q4AA 0A8Q4A 

AAAQA8Q4AAAAQA8Q4AA" 

120 A2="V10QA8Q4AAAAQA6A8Q4AQA8Q4AAA QG8 

Q4GGGSQ8G8Q4GGGQGaQ4GGG" 

130 A="QF804FFFFFFQG8Q4GQG8Q4GGG QA8Q4AA 

AAQG8Q4GQA8Q4AAA":A3=At"QG8":A4=At"AA" 

140 A="0A8Q4AAAA":A5=AtA*AtA+At"AA" 

150 A6="Q88Q4BBBQB8Q48BBQB8B8Q4BB QA8Q4A 

AAQA804AAAAAOG8Q4GG" 

160 Bl="V10QE8Q4EEEEQE8Q4EEaE8E8O4EE QE8 

04EEEEQE8Q4EEEE0E8Q4EE" 

170 B2="V9 0E8Q4EEEEQE8E8Q4E0E8Q4EEE 0D8 

Q4DDD0Q8D8Q4DDDQD8Q4DDD" 

180 B="QC8Q4CCCCCCQD8Q4DQD8Q4DDD QE8Q4EE 

EEQD8Q4DQE8Q4EEE":B3=B»"QD8":B4=Bt"EE" 

190 B="QE8Q4EEEE":B5=B+B*BfBtB+"EE" 

200 B6="QG8Q4GGGQG8Q4GGG0G8G8Q4GG QF#8Q4 

F#F#F#QF#804F#F#F#F#F*QD804DD" 

210 C1="363V9 L16 QC8Q4CCCCQC8Q4CCQC8C8Q 

4CC QC8Q4CCCCQC8Q4CCCCQC8Q4CC" 

220 C="QC8Q4CCCC":C5="B63V9L16"*C*C*C+C* 

C»"CC" 



Notes' notes J-V-J-V 






CD© vx^ u yytfr* uz z>tm,ftz> < 
«©li, Bu«(ifc<» *•©«©#©* 
Zi>. ia*j«tiiOfcU<_:Sli 




'a-rt-IWffWMSUEj Ml 



230 C6="QE8Q4EEEQEB(UEEEQE8E8Q4EE 0D804D 

DDQD8Q4DDDDDQ<B8Q4BB>" 

240 C="Y18.44SASY18.268A8Y18.448A8Y18.26 

SAS":C=C*C 

250 C2="B3V12Y34.32Q8> L 16AR16E8GAGASL32 

A4&" +C+" >C8SY1 8 . 99SC8Y1 8 . 79&C&Y1 8 . 99SC8Y 

18.798CD8SY18.1418D8Y18. 1 198DSY18. 141 &DS 

Y1B.1198D<B8.8Y1B.798BSY18.618B&Y18,79SB 

8Y18,61SBSY18.798BSY18.618BG8<" 

260 C0="> F48Y18.219SF8Y18.1928F&Y18.219 

8F8Y18.192&F8Y18.219SFSY18.192SFSY18.219 

SF8Y18.1928F G48Y1 8. 0SGSY18. 1 08GSY18 . 0SG 

&Y18.10SGY34.0Q4G16G16QY34.32 A48"»C 

270 C3=CO*"89Y34.0O4L16>CC<BBAAG8<" 

280 C4=CO*"B9Y34.0Q4L16>CD<BR16GA8.<" 

290 D1="AAR16GAR16GAR16G>A<G)CCD8< AAR16 

GAR16GAR16G>A<G>C8DD<" 

300 D2="AA>C<R16A>E<R16AR16A>C<AAR16>ER1 

6< GGBR16GR16>D<GR16GBGGR16>D<R16" 

310 D="FFAR16F>C<R16GR16GBR16GR16>D<R16 

AA>C<R16A>E<R16AR16A>A<AA>E<R16" 

320 03=D«"G":D4=D+"A" 

330 D5="AAR16GAR16GAR16GAR16GAR16GAR16GA 

R16GAR16GAR16G>C8DD<" 

340 D6="GGBR16G>E<R16GR16GBGGR16>E<R16 F 

#F#AR16F#>D<R16F#R16F#AF#F#>D<R16G" 

350 E="Y20.44SA8Y20.268A8Y20.448A8Y20.27 

8A8":E=E+E+E*E 

360 E1="B3V12 L16>Q6C8QC#32D.<BAGA8EGAEG 

AG>CD<BL32A8A48"*E 

370 E2="B6Q4L16 V14AV1 1 AVI 4EV1 1 EV14GAV1 1 

AV14AV1 1AV14EGAB>C<BG >V14CCV1 1CCV14DDV1 

1DD<V14BBV11BV14GGV11GV14EV12E" 

380 E = "VKFFV11FVnSGV11GVHAV11AV14GGV1 

1GV14AAV1 1AV14BV11B>V14CCV1 1CV14DDV11D" 

390 E3=E+"V14EV11E<BBV12BBV13BBV14BV15B" 

:E4=E*"<V14BV11BAAV12AAV13AAV14AV15A" 

400 E6="316V11Q6L16>A<A>E<A>GA<A>AA<E>GA 

<A>>D<B<G>G<G>D<A>GA<E>A<A>GA<E>GA<G>G'" 

410 F1="33V10 L16R16>C8C#32D.<BAGA8EGAEG 

AG>CD<B316>CD<V1 1 BA>>V1 2CD< BA4< " 

420 F2="a48Q6L16 VI 2EV9E< V12BV9B>V1 2DEV9 

EV12EV9EV12<B>0EF*GF#D V1 2GGV9GGV1 2AAV9A 

AV12F#F#V9F*V12ODV9DV12<BV10B>" 

430 F6="316V9QL16R16>A<A>E<A>GA<A>AA<E>G 

A<A>>D<B<G>G<G>D<A>GA<E>A<A>GA<E>GA<G" 

44 F="V12CCV10CV12DDV10DV12EV10EV12DDV1 

0DV12EEV10EV12F#V10F#V12GGV10G" 

450 F3 = F(-"V12AAV10A V128V1 0BF#F#V1 1 F#F#V 

12F#F#V13F«V14F»" 

460 F4=F+"V12AAV10A VI 2F#V1 0F#EEV1 1 EEV1 2 

EEV13EV14E" 

470 R="HB!16HB!16C16B! 1 6HSM! 16H16C16SM ! 1 

6H16HSM!16CB!16B!16HSM!16H16C16B! 16 H" 

480 R1=R*"16HB! 16C16B! 16HSM! 16H16C16SM ! 1 

6H16HSMI16C8! 16B!16HSM!16H16CSM!16B!16" 

490 R=."HB!16HB!16C16B!16HM!16H16CB!16B! 1 

6HB! 16H16C16B! 16" 

500 R2=R«"HSM! 16H16CB! 16SM! 16" +R*"HSM! 16 

HSMM6C16SMM6" 

510 P="V13CV1 1CVCV7C":P1="R"*P+"R16"tP+P 

*"R16"»P*"R4."*P+"R16"+P+P+"R16"*P*P 

520 P2="R"«P*"R4.":P2=P2+P*"R16V13CV10C" 

♦P2t"V13CV11C"tP*"Vl3CVl0C" 

530 * PLAY 



f ■• .1 



600 
610 



FORX=0TO1 

PLAY#2."" ."".""."".""."". R1.P1:NEXT 

FORX=0TO1 :FORY=0TO1 

PLAY#2.A1.B1.C1."".""."".R1.P1:NEXT 

FORY=0TOX«2 

PLAY#2.A1.B1.C1.D1.""."".R1.P1:NEXT 

PLAY*2.A1 .81 .CI .01 .El .F1 . Rl .PI 

FORY=0TOX 

PLAY#2.A2.B2.C2.D2.E2.F2.R2.P2 



630 PLAY»2 . A3 . B3 .C3 , D3 . E3 . F3 . R2 . P2 

640 PLAY#2.A2.B2.C2.D2.E2.F2.R2.P2 

65 PLAY#2.A4.B4.C4.D4.E4.F4.R2.P2:IFY=0 

ANDX =1THENPLAY#2. ""."".""."". ">".">" 

660 NEXT:NEXT:FORX=0TO1 : PLAY#2 . A5 . B5 .C5 . 

D5."05"."05".R1 .PI :NEXT:FORX=0TO1 

67 PL AY#2 . A6 . B6 . C6 . D6 . E6 . F6 . R2 . P2 

680 PLAY#2.A1 .B1.C1.D1.E6.F6,R2.P2:NEXT 

690 GOTO540 



^-O^+K-ryJlxcV 



Run For ? 



se.&'WfX^D. a. F(K-r^©5i^ 
Ut-<? j ■ny\z)ft€i l fr{;tz&z>tj.miift-fc 

©^'jy-^-u^i'^^iiQicuoo, /^ihbu 

XAlc^or*5ci:7V6lcfct.Ly5^5 



10 • I="L803CCE-12<B-16>R16CCC24C<B->CC 
E-12F16R16CL24CCCC<B-8B8)":El="a33Vl508" 
♦I:F1="ai2V12Q3"*I 

CLEAR 1000 0:_MUSIC( 1 . . 1 . 1 . 1 . 1 . 1 . 1 ) : D 
EFSTRA-2 

oOUND7.4'9:SOUND6.12 
40 _V0ICEia33.312.a6) 
50 '••••• DRUMS •••••••••••••!•••••••• 

60 Z="a30O3B":A=2*"4":B=Z*"8":C=7*"16":O 

= Z-t"32":Z = -33102A":H = Z*"4":I = Z«"8":J = "R1 

6":K=Z+"32" 

70 R=JtJ*B*J*J*B:S0=R*R*R*R 

80 Z="SM2600C":A=Z+"4":B=Zt"8":C=Z+"16": 

D=Z*"32":Z="SM300C":H=Zt"4":I=Zt"8":J=Z» 

"16":K=Zt"32" 

90 R=JtJ*B+JtJ*B:R2=R+R»RiR 

100 R="8A15V13B16B16S!B16B16816B16S!B16B 

16":R0=R*RtR*"B4B4":Rl=R»R»R*R 

110 P="3A15V13B16B16S!C!B16B16B16B16S!C! 

Bl6816":R0=R*R*Rt"B4B4":R3=PtP»PtP 

120 R1=R+RtR+"S!888S!8B8" 

130 R2=RtR*R+R 

140 ' 

150 'C.C+D.O+E.F.FtG.G*A.A»B.C.CtD.D+E. 

160 'C-F'E-A'D-t-G* 

170 A0="a48V15O5L2CED*F" 
130 B0="a48V15O5L2FAG+A+" 
190 C0="36V12O4L4CED*FCED*F" 
20 D0»"a6V12O4L4FAG+AtFAG*A»" 
210 G0="O3L8CCCCEEEED*O+D+D+FFFF" 



(MSX-MUSIC0?'j/?)fl.©7|-:? 



FB7vnfc7f 'J Vi-)W%<t>iblz wax 
-i7.i7©BGMCUri.i$fcU<t|go 

jR©j;^a»jiS5#so*Et 



©F M Bpi + u XAmm ©,*g*>S fi-bt 
CDfrn®(FMgm''UOMg>FMB 
m(Dz>-5mV)(D3mZPSGZ-mt>t) 
©FMBiSgB©@B3, @Vn, Yr, 
dawn, UXAfi»sls©@vntf 



72 tv r FM^^fij ^(Dummm^/mm^mommitm^-v 



229 Gfl="03L16EEEEEEEEDEDDDDDDCECCCCCCDED 

WOOD" 

238 A8="a6V804L2EFED" 

249 A1="86V804L2EFEAV1206" 

258 G1="0SL16EEEEEEEEDEDDDDDDCECCCCCCFEF 

FFFFF" 

268 G2="03L16CDCCL8<B>DDL16EDL8DDG*G+G+G 

tCCOO" 

279 A2="a3V1505L16EDEEL8<B>DELl6EFL8EFG* 

G*L16GtG+AAL8<BB>CC" 

289 A3="a6V1806L16EDEEL8<F>G«G*Ll6G+AL8G 

♦AL4G*.L16GGG*G*EEFF" 

296 A2="33V1505L16EF+EEL8<F>F+16R16F*16R 

16L16G*F->L8F+16R16F + 16R16016R16D16R16L16 

B*B«>C*Ct<L8<FF>EE" 

399 G3="03L16CDCCL8<B>DDL16EDL8D0G+G*L16 

G»G*AAL8<BB>CC" 

319 G4="03L16AAAAAAAAAAAAAAAAAAAAAAAAAAA 

ACCDD" , .„. 

311 Z4="05V8L1A&A":Y4="05V8L1ESE" :Y5= D8 

D":Z5="G8G" 

529 A4="a6V1206L8AA*G+AAAA AA+G*AGEF16 

321 B4="S6V1206L8CtDB»CtCtCtC» CtDB*C*B+ 

EF" 

339 A5="L8CDECDFEAEAEEE16" 

331 B5="L8EFGEFGGC*GC*GGG" 

349 A6 = "L8AAOC<AAAAAAOC<AD0DE16" 

341 B6="L8CtD>E<C*CtCtC*C«D>E<C-tFtF*FtG + 

359 C4 = "a3V1405L4VUAV9A*G + AAAA":C5 = "V13 
AA+G*ADDCC":D="ai404L16V18AV8GA+GBGB*G": 

D4=D»D+D*D 

368 G5="03L16GGGGGGGGGGGGGGGGGGGGGGGGGGG 

GCCDD" 

379 G6="03L16EEEEEEEEDEFGEEEEDEFGEEEE0EF 

G<BB>CC" 

389 A7="L2CL16FCABEEEEDEFGEEEEDEFG<BB>CC 

399 A8="L2CL16FCABEEEE0EFGEEEEDEFG<BB>>E 

E<" 

498 G7="03L16EEEEEEEEDEFGEEEEDEFGEEEEDEF 

G<BB>AA" 

419 G8="L16C8CCCC0DD8DDDDEEG8GGGGAAD8D0D 

DEE" 

428 A9="L16E4EEFFF8FFFFGG88BBBBGGB88BBBF 

421 B9 = "L16G<-4G*G*GGG8GGGGBB>D + 8DtD*D*D* 
<BB>D+8D+D+D+D+<AA" 

422 P2="L16G+4G+G*GGG8GGGGBB>D*8D+D*D+D+ 
BB0*8D*D*D»0t >EE<" 

439 Q2="L16E4EEFFF8FFFFGGB8BBBBGGB8BBBB> 

GC< " 

449 G9="L16C8CCCCDDD8DDDDEEG8GGGGAAB8BBB 

B8B" 

459 QB="L16BBBBBBBBBBBBBBBBBBBBBBBBBBBBC 

COD" 

468 al="L16DG0GDGDGDGDGDGDGDGDGDGDGDGDGC 

CDD" 

461 Pl="L16F+BF»BF*BF*BF*BF+BF+BF«BFtBF* 

BF*BF+BF*BF*BEEF*F*" 

t78 E8»"333V15a8"*G8:F8="S12V12Q3"+GB 

488 D="R16":E4=D+A4:E5=0+A5:E6=0+A6 

499 '♦♦♦♦♦PLAY 

588 T="T168" :PLAY*2.T .T .T ,T .T .T .T 



,"V15 
51 



-V15" 



-V9" 



PLAY#2.A0.B1 .C9.D1.E0.F8.R1 
GOTO 588 

C8.D1 .G1 .G1 .R9 
CI .01 .G2.G2.R1 
C1 .01 .G3.G3.R9 
CI .01 .G3.G2.R1 



539 PLAY»2.A1 

548 PLAY#2."" 

558 PLAY#2."" 

569 PLAY#2.A2 



„ PLAY#2.A2."" .CI -01 .G3.G3.R1 
588 PLAY#2.A4.E4.C4.D4.G4.G4.R1 
598 PIAY#2.A5.ES.C4.D4,G4.G4.R8 

688 PLAY#2.A4.E4,C4.D4.G5.G5.R1 
019 PLAY#2.A5.E5.C4.D4.G5.G5,R9 
620 PLAY#2.A4.E4.C4.D4.G4.G4.R1 
638 PLAY#2.A5.E5.C4.D4,G4.G4.R9 
648 PLAY*2.A6.E6.C5.04.G5.G5.R1 
658 PLAY#2.A1."".C1.D1 .G6.G6.R1 
651 PLAY*2.A1 ."".CI .01 .G6.G6.R1 
679 PLAY#2.A7."".C1 .01 .G6.G6.R1 

689 PLAY#2,A8."".C1.D1 .G7.G7.R1 
699 PLAY#2.A9."".C1 .01 .G8.G8.R3 
798 PLAY#2.Q2."".C1 .D1.G8.G8.R3 
718 PLAY#2.A9,"".C1 .D1 .G9.G9.R3 
7-8 PLAY#2.Q1 ."" ,C1 .D1 .08.09. R3. 01 



MfiEOflSttfcffl 



,01 



'39 C9="RlR2.a6Vl2O5L16CC00":C8="R1R4L16 
AGAAAAAAAAA" 
748 GOT0519 



COSMIC RHAPSODY 



RHAPSODY. FM6 



18 '»«« COSMIC RHAPSODY »«» 

28 CLEAR 3999:CALL MUSIC! 1 . 9 . 1 . 1 . 1 • 1 . 1 . 1 

) 

39 T$="T16S" 

48 A$="V1506L12RCFB->L6C<B-A-L12GFGA-2.R 

CFB->L6C<B-L12A-GFE-F0-2.":A3$="a6"»A$ 

5 8 A4$="RCFB->L6C<B-L12A-GFE-GFB-GL6FGB- 

>C2 &Y16.97&L32C&Y16.1B48CSY16.111SC8Y16 

. 1 1 88C&Y1 6 . 1 258C8Y1 6 . 1 32&C&Y1 6 . 1 398C8Y1 6 

.1478C&Y16.155SC1" 

68 A5$="RCFB->L6C<B-L12A-GFE-GFB->CR12E- 

R12F48F1&F18F18F2F6F12R":A7$="32V1507" 

71 A8S="L12FE-DE-DCE-6<B-6F6E-B->CF2.FE- 

DE-DCE-6<B-6F6E-DFC2. >FE-DE-DCE-6< B-6F6E 

-FB->CE-GF6E-6A-6GFE-F48FE-DCD<B->C<GA-F 

GE-FDE-CD<B-" 

88 A9S="348V605C2.<FA>C02G2C2.<FA>CD2G2F 

2.<B->DFG2>C2<B2.E-GtB>C»2F*2" 

98 ACS = " >F6F6FFE-6E-6E-E-D-6D-60-D-E-6E- 

6E-E-" 

189 B3$="34"*A$:B7S="a2V1507" 

119 I$="V15Ll2CGF>C<B->FE-B-A->E-D-A-G-> 

[,. <B > FtE BA>EDAG>C<":C1$ = "a26Y34.3203"*IS 

129 C$="B-6B-B-B-6B-B-B-B-B-B-A-6A-A-A-6 

A-A-A-A-A-A-" :C2S=CS+CS 

139 C5$="B-6B-B-B-6B-B-B-B-B-B-A-6A-A-A- 

6A-A-R12B-1B-6A-&A-2.A-68-8B-2.B-6A-8A-2 

B-6B-R" 

149 C7$="36Y34.BV1204F2.L12FFFG2.GGGA-2. 

A-A-A-R12>>>V15C6E-6FRl2a22V1106L24F8Y18 

.1948F8Y18.1848F8Y18.174&F8Y18.164&FSY18 

.1548F8Y18.144&F8Y18.134SF8Y18.124&F&Y18 

.1148F" 

158 C9S="348V405L1CDCDFGB>C*" 

168 CA$="a6V1507L12F6FR2.RlF6FR2.R1" 

178 CB$="V1B05L406GGGGFFFFE-E-E-E-FFFF- 

188 CC$="V1507L12Q8F6F6FFE-6E-6E-E-0-6D- 

6D-D-E-6E-6E-E-" 

199 D1S="326Y35.3202"*IS 

29B D$=" F6FFF6F FFFFF E-6E-E-E-6E-E- E-E-E- 

E-" :02$=D$+0$ 

218 D5$="F6FFF6FFFFFFE-6E-E-E-6E-E-R12F1 

F6E-8E-2.E-6F8F2.F6E-8E-2F6FR" 

229 D7S="S6Y35,BV1204F2.L12FFFF2.FFFF2.F 

FFR12>>V15G6B-6>C3206R2" 

239 D9$="348V404L1AB-AB->DE-GtA" 

249 DA$="a6V1507L12C6CR2.R1C6CR2.R1" 

259 DB$="V1B05L4Q6CCCC<B-B'B-B-A-A-A-A-< 

268 DC$="V1507L12Q8C6C6CC<B-6B-68-B-A-6A 

-6A-A-B-6B-6B-B-" 

279 E1$="a26Y36.3201"*IS 

289 E$="C6CCC6CCCCCC<B-6B-B-B-6B-B-B-8-B 

-B->":E2S=E$*E$ 

299 E5S="C6CCC6CCCCCC<B-6B-B-B-6B-8-R12> 

C1C6<B-8B-2.B-6>C8C2.C6<B-SB-2>C6CR" 

399 E7$="a6Y36,BV1303L1FSF8FR12>>>V15Ll2 

F6A-6B-a206R2" 

318 E9$="a48V404L1FGFGB->CE-F+" 

39 8 EA$="a6V1506L12G6GR2.R1G6GR2.R1" 



33B EBS="V1B04L4Q6FFFFE-E-E-E-D-D-D-D-E-' 

E-E-E-" 

349 ECS="V1507L12QBG6G6GGF6F6FFE-6E-6E-E 

-F6F6FF" 

35B F1S="a9V1502L24C+DD+EFF+GG*AA»8>CC*0 

DtEF :F,GGfAA<-B>CC+DDtEFF*GG*AAtB>CCtDD + EF 

F+GG+AA»B" 

369 F$="al2V1503L12F6F>C<B-FGFGCE-FE-6E- 

B-A-E-FE-F<B->D-E-":F2$=F$*F$ 

379 F5S="F6F>C<B-FGFGCE-FE-6E-8-A-E-FE-R 

12F4&FFGB->C<E-FGFCE-FE-FGB-A-FE-FE-CE-F 

6FGB->C<E-FGFCE-FE-FGB-A-FF6FR" 

389 FS="F6F>F<FF":F6S="02"*F$*F$*FS*FS*F 

$*F$«F$*"FE-FCE-F" 

398 F8S=F$»F$*"E-6E->E-<E-E-E-6E->E-<E-E 

-D6D>D<00D6D>D<D0C6C>C<CCC6C>C<CC"«F$*F$ 

t"E-6E->E-<E-E-C6C>C<CCF6F>F<FFE-6E->E-< 

E-E-D-6D->D-<0-0-E-6E->E-<E-E-" 

488 F9$="R32BV304CFA>C2R1R<CFA>C2RlRFB-> 

0F2R1RDtG+B>D*2R2.312Vl503Ct4<" 

418 FA$="F6FR2.R2A-B-A-E-D-E-F6FR2.R2E-B 

-E-CGE-" 

42B FBS»"L4FFFFE-E-E-E-D-D-D-D-E-E-E-E- 

43B FC$="L12F6F6FFE-6E-6E-E-D-6D-6D-D-E- 

6E-6E-E-" 

448 R1S="Y24.31V15B12B12B12B12B12B12B12B 

12B12B12B12B12B12B12B12B12B12B12B12B12B1 

2BM12BM12BM12" 

458 R$="B6BM6B12B6BM12B12Bl2B12B12"tR2$= 

RI+RS+RS+RS 

469 R5$=RS*"B6BM6B12B6BM6BM4Y24.125M24M2 

4M1 2M1 2Y24 . 63M1 2M1 2M1 2Y24 , 31 M1 2M1 2M1 2BM6 

BM12Y24.125M12M12M12Y24.63M12M12M12Y24.3 

1M12M12M12BM6BM12Y24.125M24M24M12M12Y24. 

63M12M12M12Y24.31M12M12M12BM6BM12Y24.125 

M12M12M12Y24.63M12M12Y24.31M12BM6BM12R4" 

478 RS="B48M6B12B4BM6B12" : R6$=RS+R$*R$+" 

B4BM6B12B12M12B12M12B12M12" 

48B R8$-RS + RS»RS*R$*RS<-RS + RS + "B4BM6B12B4 

M12M12M12" 

49B R9$="R1R1R1R1R1R1R1R2.M4" 

589 RAS="BM6BM12R2.R1BM6BM12R2.R1" 

518 RB$="B4M4B4M4B4M4B4M4B4M4B4M4B4M4B4M 

4" 

52B RC$="BM6BM6BM12BM12BM6BM6BM12BM12BM6 

BM6BM12BM12BM6BM6BM12BM12" 

538 S1S="SM25BBR1R2.L12AAA" 

548 S$="M3B8AAM25aBAM39BAAAAM2508AM30flAA 

AA":S2$=S$+S$tS$tS$ 

559 S5$=S$»"AAM2508AM2B0AAAAAR12M8008A2R 

2M25BBA6AR2 . A6AR2 . A6AR2A6AS4M22BBA4SBM3B 

9" 

569 S$="AAAM258BAM3B0AAAAAM25B0AM3B8AA : 

S6$ = SS + SS+SS<-"AAAM25eBAM38BAAAM25e8AM3BB 

AM25B9AM3BBAM2588AM3BB" 

578 S8$=S$tS$*S$»S$*S$tS$*S$*"AAAM25B9AM 

390AAAAAM25B0AAA" 

580 S9I="R1R1R1R1R1R1R1R2.M25B9A4" 

599 SA$="M25BBA6AR2.R2R12M3BBAAAAAM2599A 
6AR2.R2R12M300AAAAA" 

600 SS="M38BAAAM25B0AM3BBAA":S8S=S$+SS*S 
$*S$+S$+SS+SS+SS 

61 B SC$="M2508A6A6AAA6A6AAA6A6AAA6A6AA" 
62B P5$="R1R1R1R1R1R2.04L4S4M22BBF" 
638 S0UND7.8H31 :S0UND6.28 

649 P0KE8HFA2C.45:P0KESHFA4C.28:P0KE&HFA 

5C.10 

650 PLAY#2.T$.T$.TS.TS.TS.T$.T$.T$.TS 
669 PLAY#2.A1$.B1$.C1$.D1S.E1S.F1S,R1$.S 

1$ 

678 PLAY#2 . A2$ . B2$ . C2$ . D2$ . E2$ . F2$ . R2$ . S 

2$ 

688 PLAY#2 . A3S.. B3$ . C2$ . D2$ . E2$ . F2$ . R2$ . S 

2S 

690 PL AY#2 . A4$ . A4$ . C2S . D2S . E2S , F2S . R2S , S 

2$ 

7BB PLAY#2.A3$.B3$.C2S,02$.E2$.F2$.R2$.S 

2$ 

718 PLAY*2.A5$.A5S,CS$.D5$,E5S.F5S,RSS.S 

5$.P5$ 

729 PLAY#2 . A6$ . B6S . C6$ . D6$ . E6S i F6$ . R6$ . S 

6S 

738 PL AY#2 . A7$ . B7$ . C7S . D7$ . E7I -F6S . R6$ . S 

6$ 

7i.g PLAY#2 . AB$ . A8$ . C8S . A8S . A8$ . F8S . R8S , S 

8$ 

75B PLAY#2 . A9S . A9$ . C9I . D9$ . E9S . F9$ . R9$ . S 

9$ 

769 PLAY#2 . A3$ . B3$ . CAS . DAS , EA$ . F A$ . RA$ . S 

AS 
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778 PL AY*2 . A3$ . B3S . CAS , DAS . EA$ . FAS . RAS , S 
AS 

788 PIAY*2.A3S.B3$.CBS.DB$.EBS.F8S.RBS.S 

BS 

798 PLAY#2 . A3S . B3S . CBS . DBS . EBS . FBS . RBS . S 

BS 

8BB PLAYt2 . ACS . ACS . CCS . DCS . ECS . FCS . RCS . S 

CS 

81 8 GOTO 660 
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IB CLEAR1888:_MUSIC( 1 .8. 1 . 1 . 1 .3) 

2B _V0ICE(S)31 .323. .a23i36.36.a6) 

58 DEFSTRA-Y:DEFINTZ:T="T19B" 

48 PLAY#2.T.T.T.T*">" .T.T.T 

58 AtB)="R1R2":A(5)="R1R2" 

6B A< 1>="V15Q2L8CC4CC4R2EE" 

7B A(2)="02L8EE4EE4R2FF" 

8B A(3)="Q8L2CEF":A(4)="Q8L2EGF" 

9B B(8>="V15R1R2":B(5)="R1R2" 

IBB B(1)="V15Q3L8EE4EE4R2GG" 

118 B(2)="03L8GG4GG4R2BB" 

12B B(3)="R1R2" : 8 < 4 ) ="Q8L2GGA" 

13B B(5)="V1SR1R2" 

UB C(8)="0.6L8CC*DD + EE + CC + DD + EE" 

15B C(1)="V11"tC(B) :D(B)="L8CC4CC4DD4DD4 

■ :D(1 )="V13"+D(B) 

168 E(B)="aA12V7Y24,128Y23.38CHS8MS!8CS8 

MS ! BSCH8MS 18S8CHS ! BMS8CHS ! 8S8CMS i 8" 

!7B F(8)="07V9L64C0CDCDCDCDCDCDCDCDCDCDC 

DCDCDCDCDCDCDCDCDCDCDCDCDCDCD" 

188 F(l )="07V14L64CDCDCDCDCDCDCDCDCDCDCD 

CDCDCDCDCDCDCDCDCDCDCDCDCDCDCD" 

198 G(3)="06L4V1SCV14CV13CV12CL9V1 1CV1BC 

L32V9CV8CV7CV6CV5CV4CV3CV2CV1C" 

288 FORZ=3T07:PLAY#2."V=Z;"+D(B) -.NEXT 

218 F0RZ=7T01B:PLAY#2."V=Z:" .""."" ,'V = Z ; 

":PLAY#2.D(8> .""."". C(B)."".F<0):NEXT 

228 Z = RND(-TII1E)»6:PLAY#2.D<1).AIZ),B<Z) 

.C(l ) ,E(8) ,F(Z) .G(Z) :GOT0228 
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IB CLEAR200B:_MUSIC(1 ,8.1.1.1.1.1.1) :.TR 

ANSPOSE(B) :_BGMI1 ) :TS="T15B" :PLAYt2.TS.T 

$ . T$ . T$ . TS . TS . TS . T$ : .PITCH ( 448 ) 

28 FORI=0TO5:POKE8HFA2C+16»I.I«10*10:NEX 

T:S0UN07.49:S0UND6.8 

3 8 A0S="314V15O2L12FG*B>DFG*B>DFG*B>DR1V 

13343" 

48 B0S="R24"tABS 

S3 C0S="al4Vl5O2L12R8FG+B>DFG*B>DFG*B>DR 

1V12343" 

61 D0S="R24"+C0S 

78 ES="L8Q4AAAAAAGGAAAAAAGG":E0S="35V12O 

2Fla33V15"tES 

S? F0S="35V11O2F1314"+E$ 

9B A1S="L8Q404AB>CDQ8E4Q4CGQ8F+4L4808.SD 

DEL8Q4FEDC<Q8B4.A4>DC<AAG+4<G+A>B4E4" 

188 BlS="a5V1B"*AlS 

118 C1S="04L8C04EAG*Q8G4L48EB.&EEFL8Ft4D 

4Q4AGFEQ8L48D4. .8DDEQ4F8R8Q8C4< B4 . .8BB>C 

Q4D8R8Q8<G+4" 

128 D1$="35V9"*C1S 

El$ = "02L8a8AQ4>A<Q8B04>B08O04C<Q8D> 
04D<<08AQ4>A<Q8804>Ba8C>Q4C<<Q8AQ4>A<FFF 
FFFFFEEEEEEEE" 

158 A2S="L4FA>CFQ4<EE>Q8L16314EFEDEFEDEF 
ED" 

168 B2$="L4FA>CFQ4<EE>Q8L16al4R32EFEDEFE 
DEFED32" 

178 C2$="L16A8B>C<B>CDED8EFEFGAQ4<G+G+}4 
Q8R16. >314EFEDEFEDEFE32" 

188 D2$="L16A8B>C<B>CDED8EFEFGAQ4<G*G*>4 
Q8R16. . >314EFEDEFEDEFE64" 
198 E2S="03FFEEDDCC<BB" 

218 A3S="043L4<FA)CFQ4<EE)Q8L8a3403<EAB> 
OEAB>E>L24D<BG*FED<L16BG»FDB14" 
228 B3S="a5l4<FA>CFQ4<EEXJ8L831403R32{EA 
BX>EAB>E>L24D<BG*FED<L16BGtFD3235" 
238 C3S="L16343<<A8B>C<B>CDED8EFEFGAQ4<G 
+G+>408R16. >a3403L8CEAB><>EAB>E>L24D<BGt 
FED<L16BGtD32a43" 

248 D3$="L1635<<A8B>C<B>CDED8EFEFGAQ4<G+ 
G + UQ8R16. . >ai403L8CEAB>OEAB>E>L24D<BGt 
FED<L16BG+D6435" 

258 E3S = "L80.8AB-A>C + <AB-A>D<AB-A>E<AB-A> 
F<" 

278 AS = "Q8L80S{EAEA>-CEAE>04AG*Q8<EGEG><E 
GE>Q4GFt08{DFDFXDFD>Q4FEQ8<CE-CE-XCE-C 
>Q4DE" :OS="Q8<AB-A>Ct<AB-A>D<AB-A>E<AB-A 
>":A4S="314"+AS*"a45"+QS+"F343" 
288 B4S=AS+"R16"tOSt"F16" 

298 C4S="Q8L405C.<B8B- . A8A- . G8F<- . G + 8L8< A 
B-A>C+<AB-A>D<AB-A>E<AB-A>F" 
388 D4S="Q835L405C.<B8B-.A8A-.G8Ft .G«8L8 
R16<AB-A>C+<AB-A>D<AB-A>E<AB-A>F16ai4" 
318 E4S=E3S*"Q4AAR4AAR4AAR4AA" 
338 AS="L4<AB>CDEFF+G+" :A5$="343"+AS:B5S 
=A$ 
3? 8 C5S="EFEG+EFEAEFL16BFDFAF*DF*G+E<B>E 

378 E5$="L4Q8>AA-GFEDC<B" 

388 GS="B16B16B16B16" : L$="B8B8SC8B8B8B8S 

C8B8" :GB$="V2"*G$+"V4"+G$t"V7"*G$*"V18"* 

GS<-L$*L$ 

398 G1S=LS»LS+L$+"B8B8SC8B8B8SC8S16S16B8 

4BB G2$=LS*"SC8SC8R2SH16SH16B8" 

41B G3S=LS*L$ 

428 G$="B8B8SC16SC16B8":G4S=L$+LS+GS+GS* 

GS*G$ 

438 G$="SC16SC16B8":G5S=LS*"B8B8"*GStGS* 

"SC16SC16B16B16" 

44B HS="CCM28B8CM16B8CCCM28B8CMl688C":He 

S="R2.L16SBM400 0CCM28B8L8CM16B0"+HS+H$ 

458 H1S=HS*HS+HS+"CCM2B8BCM16B8CCM288 8CL 

16CCL8M1680C" 

468 H2S=H$*"M2888CCR2L16CCLBM168BC" 

478 H3S=HS»H$ 

488 PS="CCL16M288BCCL8M168BC" :H4S=H$+H$+ 

PStPS+PStPS 

498 P$="L16M28B8CCL8M16B8C" :H5S=HSt"CC"+ 

P$+P$t"L16M28B8CCM1608CCL8" 

1BBB PLAYt2.A8S.BeS.CB$.DBS.E8S.F8S.GB$. 

HBS 

1885 F0RI=8T01 

1818 PLAY#2.A1$.B1S,C1S.D1$.E1S.E1S.G1S. 

H1S.-NEXT 



1828 PLAY#2.A2S.B2$.C2S.D2S.E2S.E2$.G2S. 

H2S 

1838 PLAY#2.A3$.B3$.C3S.D3S.E2S.E2S.G2$. 

H2S 

1B4B PLAY#2."" . "" ."" ."" . E3S . E3S . G3S , 

H3S 

1858 F0RI=BT01 

1868 PLAY#2.A4$.B4S.C4$,D4S.E4S.E4S.G4$. 

H4S:NEXT 

1878 PLAY#2.A5S.B5$.C5$.C5S,E5S.E5$.G5$. 

H5$ 

18S8 G0T01BB5 
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188 


CALL MUSICie.e.3.2.2) 


1 10 


CLEAR 1000:DEFSTR A-T 


120 


CALL V0ICE(345.36.314.a9.33.a6.a9l 


138 


P0KE&HFA2C*16*1 . 28 : P0KESHFA2C* 16«4 . 3 


B:P0KESHFA2C*16«6.6B 


150 


T="T120" 


178 

A" 

188 


A0="V12O4L4B.SL8B.L16B>C+DL8EDC+DC+< 


Al="B>ED<B>F*E<B>AG<B>>Ct<B" 


198 


A2=">L2C*<L4BL2F*.&F+." 


288 


A3="L16F*GAGF*GF*EF*EDC*" 


218 


A4=" >L2C*&L16C*<B>C+<B" 


228 


A5="L1F*.SL8F»<B>C*DEF*" 


238 


A6="L4AG>DSD.SL8D<GF" 


248 


A7="L4GF>C8C.8L8C<GF" 


258 


A8="L4G.FL2CL8CtGF" 


268 


A9="L4G.FL2C<L8B>CD" 


778 


AA="L2E.L4EFG" 


288 


AB="B-L1A-L8GF" 


29B 


AC="L2E.L4EFG" 


388 


AD="GFD-L2A- ." 


318 




328 


88="V1304L4G.&L8G.L16GA6>L8C*<BABAF" 


310 


B1="G>CKBG>DC*<G>F»E<G>AG" 


340 


B2="L2F*L4EL2D.L4C.<B." 


358 


B3=">L16DEF«EDEDC*DC*<BA" 


368 


B4="L2F+SL8F+Ff" 


370 


B5="L4D.Ct.<L2B.SL4B.L8B>C+D" 


388 


B6="L2D.L4AGD" 


398 


B7="L2C.L4GFC" 


480 


B8="L2C. >C." 


410 


B9="<C+.G." 


428 


BA="C.L4CDE" 


430 


BB="GL2F&F." 


448 


BC="Ct.L4CDE" 


458 


BD="D-D-<B->FE-D-" 


468 


* 


47B 


C8="V1503L8CG>CDC<G" :Cl=C8tC0 


488 


C2="EB»>EFE<B»" :C3=C2+C2+C2 


498 


C4="CG>CDC<Bt" :C5=C4+C4*C4 


L ,A.> 


C6="E-B>E-<B>F<B":C6=C6*C6 


518 


C7="DB>D<B>D<C":C7=C7*C7 


520 


C8="D-A->D-<A->D-<A-":C8=C8*C8 


538 


C9="CG>C<G>C<G" :C9=C9»C9 


548 


CA="FA>CFC<A" :CA=CA+CA 
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55B 

560 
570 

588 

5'a 

600 
HI 
622 
630 
640 
650 



CB="G-B>D-G-D-<B-":C6=CB*CB 

CC="FA>CFC<B":CC=CC+CC 

CD="E-G-B>E-<BG-":CD=CD*CD 



PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY*2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY#2 
PLAY*2 
PLAY#2 
GOTO a 



.T.T.T 

.A0.B0.C1 

.A! .B1 .CI 

.A2.B2.C3 

.A3.B3.C2 

.A0.B0.C1 

■ A1 .B1 .C1 

. A4.B4.C4 

.A5.B5.C5 

. A6.B6.C6 

.A7.B7.C7 

. A8.B8.C8 

. A9.B9.C9 

.AA.BA.CA 

.AB.BB.CB 

.AC.BC.CC 

.AD.BD.CD 
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10 >?7?;/*»7 h*-?*3? STAGE13~15 BY T.ABE 

2a MUSICM .0.1 .1 .1 .1 .1 .1 ) :CLEAR9000 

'8 _TRANSPOSE(0) :_PITCH(440) :_TEMPER(9) 

40 BGMd ) :DEFSTRA-T:S0UND7. 106 

50 SOUND6.3 :POKE&HFA6C.48:POKE&HFA7C32 

60 '— (A)S(E) - MAIN 

70 A="CCCC<G16G16 G1 6A-B16 >" : B=A :MID$ ( A. 

12.1)="S":C="C"+A+"C16C16"»A 

80 D="C"»B*"C16C16"+B:E="GCFC16E-.CDC" 

90 F="C16D16E-16DC16E-.CDC" :G="<A-.>C16R 

8E-4<A->CE-<B- . >D16R8F4<B->DF" 

100 H="CGFGE-GDGCG<B>GCGDG" 

1 10 I="E-DE-DE-8CE-B.C8D8C8" : 1=1*1 

120 A0="Q4V15a24"+C:A1="Q8>C2.8Cl6&L64CD 

-DE-EFG-GA-AB-B>CK<L8":A2 = "V14a45"+E*"R 

16V11332"»F:A3="V14a45"+G 

1 3B A4="<G.B16R8>D&D2D.F16R8G4.R16G16A16 

B16":A5 = "V11316L16>"+H*"V13"»H:A6 = "V15";» 

H+"R16V1236DE-FG8FGR16GR16GL8GB<" 

140 A7="V15341L16>"+I:A8="L8E-.C.E-F.D.F 

G.F.GB-.A-.B->C1<<" 

150 A9 = "V153240.4C16C16"+A 

160 E0="V11353"*A1 :El="V1la45"+E+"V9R8a3 

2"»F»"16":E2="V1ia45"*G:E3=A4 

170 E4="V8316L16>"»H*"V10"+H:E5-"V12"*H+ 

"<":E6="V13a41L16>"*I:E7=A8 

180 ' IB) SUB 

190 B0="324V13" :B1="G2.&G16&L64GA-AB-B>C 

D-DE-EFG-GUL8" : B2= " V 1 2345C< G >C< G 1 6 >C . < G 

BG>R16V1334>"*F*"<" 

200 B3="V12345<E- . A- 1 6R8 >C4< E-A- >C< F .B-l 

6R8>D4<FB->D" : B4="< D .G16R8G&G2G . >D16R804 

. R16D16D16D16" : B5="R1 R16V1 036L 1 6GGB >D8DD 

R16DR16DL8DD<":B8="324" 

210 B6="V12S41L16>C<B>C<B>C8<G>C8.<G8B8G 

8>C<A->C<A- >C8<A->C8.<A-8B8G8>" :B7="L8<A 

-.F.A-B-.G.B->C.<A-.>CD.D.DG1<" 

220 '- (C)MD) - BASS 

230 C0=C:C1="CCCCCC16C16E-F16F16CC16C16C 

CCCE-F16F16" 

24 C2="L16<A-8A-A-A-8A-A-A-8A-A-B-8>C8< 

B-8B-B-B-8B-B-B-8B-B->L8CD":C3="<L16G8GG 

G8GGG8GGB8>D8<G8GGG8GGG8GG>C8D8" 



250 C4 = "C8>CC<C8>C8<C8>CC<COCC<<B-8>B-B 

-<B-8>B-8<B-8>B-B-<B-B->B-B-<" 

260 C5="A-8>A-A-<A-8>A-8<A-8>A-A-<A-A->A 

-A-<G8>GG<G8>G8<G8>GG<GG>GG" :C6="CCL8CCC 

CCC<B-A-16A-16A-A-A-A-A-GG" 

270 J="FL16>FF<F8>FF<G8>GG<G8>GG<A-8>A-A 

-<A-8>A-A-<B-8>B-B-<B-8>B-B-L8C":C7=J*A: 

C8="C16C16"*A:D0=D:D1=J*B:D2="C16C16"»B 

280 '- (F)&(H) - OTHERS 

290 F0="V10353<"*B1*"V13>L1" :F1="34" :F2= 
"C<B-":F3="A-G>":F4="CD":F5="E-2F2G" 
300 F6="V15a2L16"*I:F7=A8*">" 

310 '- (Gl&d) - DRUMS 

320 A="R8H8R8H8R8H16H16R16H16C8":S="Y24. 

190":G0=S+A*A:G1="B!8H8B!8H8B!8H16H16B!1 

6H16C8B!8H8B!8H8B!8M16M16B!16M16M16M16" 

330 A="B!H!8H16H16MH!8B!H16MH16B!H!8H16H 

16MH18BIH16B1H16" : G2=A+A 

340 G3=A*"H!8!8HM16H16H!B!M8H16H16HIB!M1 

6M1 6H1 6HM1 6Y24 , 1 28M ! 32M ! 32M ! 1 6Y24 . 0M ! 32M 

: 16. "+s 

350 A="B!H16H16B!C8MH16H16B!C16M16H16MH1 

6B!C8MH16H168!C8":G4=A*A 

\at B="B!M16M16Y24.128M! 16M!16"+S*"B!M16 

M16Y24.l28M!l6M!16"*S*"8iMl6M16B!l6M16Y2 

4. 128B!M!32M!32M! 1 6Y24 . 0B !M ! 32M ! 16."*S 

370 G5=A*B:C="B!C!8H16H16MB!C! 16H16H168! 

CI 16H16BIC116H16C! 16MB ! H 1 6H 16C!8" :G6=C«C 

:G7=G4tA:G8=B 

380 I0="R1R2R8CCR16CCC" : A="R4CR8CR4CR8 . " 

:I1=A+A:I2=A+"R8CR16CR8.CCR16CR4" 

j 9B A="R4CR8CR16CR8CR8.":I3=A+A:B="CCR8C 

CR8CCR16CR4" : 14= A* B :C="R4CR8 . R4CR8 . " :I5= 

C»C: I6-I3+A: I7 = B 

400 ' PLAY 

4 10 T="T 1 28" : PLAY#2 , T.T.T. T.T.T. T.T.T 

420 A="05L8" :B="05L8Q8":C="V1103L8ai404" 

:D="V1403L833304" : E=A : F="06Q8" :G="V103A1 

5":H="V905L1" : I ="S9M1 500O8L 16" 

430 PLAY#2.A.B.C.D.E.F.G.H.I 

440 PLAY#2.A0.B0.C0.O0."" ."" .G0 

450 PLAY#2.A1 ,B1.C0.D0.E0.F0.G1."".I0 

460 FORZ=0TO1 

470 PLAY#2.A2.B2.C1 .C1.E1."".G2."".I1 

480 PLAY#2.A2.B2.C1 ,C1.E1."".G2."".I1 

490 PLAY#2.A3.B3.C2.C2.E2."" .G2,"" .11 

500 NEXT 

510 PUAY#2.A4.B4.C3.C3.E3.F1 .65. "".12 

520 PLAY#2.A5."".C4.C4.E4.F2.G4,F2.I3 

530 PLAY*2 . A6 . B5 . C5 . C5 . E5 . F3 . G4 , F3 . 1 3 

540 PLAY#2.A5."".C4.C4'.E4.F4.G4.F4.I3 

550 PLAY#2.A6.B5.C5.C5.E5.F5.G5.F5.I4 

560 PLAY#2 . A7 . B6 . C6 . C6 . E6 , F6 . G6 . "" . 1 5 

570 PLAY#2.A8.B7,C7,D1 . ET.F7.G7."" . 16 

580 PLAY#2.A9.B8.C8.D2.""."".G8,"".I7 

590 GOTO450 

600 'SPECIAL THANKS TO RIEKO KIMURA 



B^m^\^^7 



H^T'JLOA 
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•"PALACE OF DESTRUCTIONj 



yinttpimtfjfmiyZ^z^iEmti-fc&o 
x^7iz^A^fioru5®t,aUo 

PALACE0F.FM6 



10 CLEAR 3000:_MUSIC (1.0.1.1.1.1.21 

2i DEFSTR A-G.T:SOUND 6.0:SOUND 7.49 

30 DIM AX(15):FOR 1=4 TO 13:READ A:AX(I) 
=VAL("&H"*A) :NEXT:_VOICECOPY (AX. 863) 

40 DATA 0, E. 0.0. 1721 .22C2. 0.0. B21 .4A0 

50 T="T150":PLAY #2 . T .T .T .T . T .T .T .T 

00 POKE &HFA3C.31 :POKE &HFA7C.31 



80 A0="B63V15OLQCD-G>CD-G>CD- 

90 A1="<<CD-G>CD-G>CL2D-SD-4Y0.97SW 

100 A2="OY0.33L8B-.A-.G.F.L16GE-FGL8E-.D 

-,F.D-.C<B-":AB="L1F8.>F16&F2.Y0.97aU 

110 A3=">B-.A-.G.F.GA-B-.>C.D-.E-.FG 

120 A="L16B-8.A-SA-4Y0.97au4Y0.33LG 

130 A4=A*A:A5=A*"L8A-.F.A-.B-.>CE- 

140 A6="L16F4Y0.97aW4aul6Y0.33GA-B->C<B- 

A-GL8F.G.E-LFY0.97aw 

150 A7="<L16Y0.33F4Y0.973W4Y0.33O-E-FGA- 

B->CD-L12C<A-FCFA->C<GE-CE-G 

160 A8=LEFT$(A3.20)»"<B-.A-.GE- 

170 A9="L16G8.F&F4Y0.97au2>L2Y0.33FY0.97 

aw" :AA=">LY0.33FY0.97aU2Y0.33CL12E-C<B-> 

C<B-A-B-A-GA-GE-":AC="<LY0.33FY0,973U4Y0 

.33GA-B-Y0.973U4>Y0.33CD- 

180 AD="L2CY0.973W2>Y0.33CY0.97aU 

190 ' 

20 B0="R24"+A0+"BSD-12":B2="R24"»A2*"12 

210 B1="R24"tA1t"4.3U12":B3="R24"*A3t"12 

220 B4="R24"+A4+"8&G12";B5="R24"*A5*"12 

2 30 B6="R24"*A6+"8aW12": B7="R24"*A7+"24 

24 B8="R24"*A8*"12" : 89="R24" *A9+"4 .3U12 

250 BA="R24"tAA+"24" : BC="R24" ♦AC*"8&D- 12 

260 BB="R24"+AB+"2. .aU12 

270 BD="R24"*AD+"4.3W12 

280 ' 

290 C="GB->D-G<":C0 = "a3V15O3L16Q"*C + C(-C» 

C*C+C+CtC:C1=C0tCtCtC*C*" >" :C8="C<8- 

300 C="F.F.F .F.FF" :C2="363V15L8"*C*C . 

310 C="G.G.G.G.GG" : C3=C+C :C7="V1 3 >L 1C&C 

320 C="L16A-A-A-A-R16A-L8B->C16<B-A-G. 

330 C4=C+C:C5=C+"L16A-A-A-A-R16B->CR16<G 

GGGR16A-B-R16" :C9="< A-B-" : CA=" A-G 

340 C6=LEFT$(C.29)+"B-."+RIGHT$(C5.36l 

350 ' 

360 D="L16FFFFR16FL8GA-16GFE-.":D4="A-G 

370 D0="a63V15OQ"*D+D:D1=D+"L16FFFFRl6GA 

-R16E-E-E-E-R16FGR16":D3="V13L1A-SA- 

380 D2=LEFT$(D.20)*"G.~+RIGHT$(D1.32) 

390 D5="FF" :D6="FE- 

400 ' 

410 E="CCCC":E0="a24V15Y53.224O3L16Q6"*E 

*E + E+E*E»E + E*E:E1=E0*">C<CCCC>C<COC<CCC 

OC<CC" :E="D-D-D-D-":E2=E*E*E+E+E*E»E*E 

420 E="E-E-E-E-":E3=E+E+E*E*E*E*E*E 

430 E="FFFF":E4=E*E*E»E*LEFT$(E3.32) 

440 E5 = LEFT$(E2.32)+MIDJ(E0.21 ,12>*"CCD- 

E":E6=LEFT$(E5.44)+">C12<C12C12 

450 E7=E+E*E*E+E*E+E+E 

460 E8="L16QD-4>06D-<D-80D-SD-4>Q6D-<D-D 

-8QE-4>Q6E-<E-80.E-&E-4>Q6E-<E-E->E-< 

470 E="QF4>06F<F8QF6F4>Q6F<FF8" :E9=E*E 

480 EA=MIDS(E8.4.31)*"<QB-4>Q6B-<B-80B-& 

B-4>Q6B-<B-B->B- 



490 

500 

8MB8 

510 

520 

3 = LE 

530 

540 

550 

560 

G*G + 

570 

580 

590 

600 

M20I 

610 

620 

630 

640 

650 

660 

670 

680 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

790 



F0="V15Y22, 100Y24.100R1R1R8MB8R8MB8R 
R 16MB 16MB 16MB 16" :F="R8MB8 
F1=F*F+F*F*F+F*F+F:F="RR2MB4 
F2=LEFT$(F1 . 35 ) ♦"MB 16MB 16MB 1 6MB 16" : F 
FT$(F1 ,30)»"MB12MB12MB12R8MB16MB16 
F4=F*F :F5=F*"RR2MB16MB16MB16MB16 
F6=LEFT$(F1.37) *"MB16MB16 

G="C32C32CCC" :G0="SL1 6M500"»G*G*G»G+ 
G*G:G="CCM2000CM500C 
G1=G0*G+G*G+"CM20 00CCC 
G2="M50I "tG*GtG+G*G*G+G+G 
G3=G+G+G+G+G+GtG+"M2000CCCC 
G4=GtGtG*G*G*Gt"M2000C12C12Cl2M500CC 
0CC" :G="LM500CCCM5000C" :G5=G*G 
G6=G+"M500CCCL16M20 80CCCC 
G7=LEFT$(G2.97)*"M2000CC 



PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
PLAY 
GOTO 



♦ 2.A0-. 
#2.A1 , 
#2.A2. 
#2. A3. 
I2.A4 
#2.A5 
#2.A6 
#2.A7 
#2.A2 
*2.A8 
#2.A9 
#2.AA 
t2.AB 

♦ 2.AC 
#2. AD 
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B0.C0. 
.Bl .CI . 
.B2.C2. 
.B3.C3, 
. B4.C4, 
.B5.C5. 
. B6.C4, 
.B7.C6. 
. B2.C2 
. B8.C3. 
.B9.C7 
. BA.C8. 
.BB.C7 
. BC.C9 
.BD.CA 



"".E0 

"".El 
"".E2 
"".E3 
D0.E4 
D1 .E5 
D0.E4 
D2.E6 
"".E2 
" " . E 3 
D3.E7 
D4.EB 
D3.E9 
D5.EA 
D6.E0 



,"".G0 
.F0.G1 
.F1 .G2 
.F1 .G2 
.F1 ,G2 
.F2.G3 
.F1 .G2 
.F3.G4 
.F1 .G2 
.F1 .G2 
.F2.G3 
.F4.G5 
.F4.G5 
.F5.G6 
.F6.G7 
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£§Bm^ sewciis&n 

Xh-U-o fl^fly^iaSI 
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-r^rBrfctUbttnBU 

£3*\ r 33=fcLb<S:1+§j© 
AM^D¥©Sg/c' 
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E 14336* I .VALC&H"+n I DSC 6060606060686060 

0080083E3E30303B142241 14220B0 00" . I»2+1 i 
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30 FORI=8TO1:FORJ=0TO1:PUTSPRITE1,I11B*( 

I ANDJ)«8 .188-11=0 ANDJ)*8)..I:FORK=8TO100 
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=X:Y(0) =Y:X(41-0)=X:Y 
1 :IFT=3THENT=B:M=M-1 

L=B:A=X+16:B=Y+12:Z 
9:CIRCLE(X+16. Y+1 1 ) . 1 
+16.Y+11 ) .I«16+32:IFC 
5 C=-(L=0)«8-(L=1 )»M 
X+7.U) .7-1 .R. . .Z+2:PA 
(X+25.U) .7-I.R. , .Z + 2 
< L=1 :NEXT:PSET(X+12. 
9) .0:D=0: IFS>9THENN = N 
:F=F+8 

' S=S+ 1 :FORI=0TO6:U=Y 
:R=I»8:CIRCLE(X+11 .U+ 
INTIX+1 1 .U+I/N) >R+6:C 
.R+F. . .W/3:PAINT(X+21 
A.B) ,2,R+128:B=B+1 :D= 
X,Y 

t FORI=0TO41 :COPY(X(I 
.1TOI112.73) ,0:FORJ=0 



DIMAI21 ) .X(41 ) .Y(41 
(1 .5«Z)/5:Z=Z+. 1 :NE 
:Z = -1 :N=1 :F=32:S=-1 
X=0TO198STEP33:X(O) 
(41-0)=Y:0=0+1 :T = T + 

= Z + .08:C=0:FORI=0TO 
-I,I«16+32:PAINT(X 
= PITHEN4 

U=Y+7:R=C«8:CIRCLE( 
INTIX+7.U) .R:CIRCLE 
PAINT(X+25.U) .R 
Y + 9) ,0:PSET(X+20. Y+ 
2:F=F-8ELSEN=N+.2 

+19:W=4.2-N:G=152-F 
I/N) ,3,R+G, . .N/3:PA 
IRCLE1X+21 .U+I/W) .3 
.U+I/W) ,R>F:CIRCLE( 
D+A(S) :A=A+D:NEXTI . 

) .Yd) )-STEP(32.25) 
T09:NEXTJ . I :G0T06 



SfWWW* ****** 




US) (18* 



SH^XMSXm, AfiOFl^iSK 

lcU57tf-K7J^■rSrg7J'oL^rL^7J^ 
U AmCMQZ^^mm^^^-Zl^CDZ 




1 B COLOR, 8,8: SCRE ENS. 1 :DEFINTA-Z:FORI=BT 

0255:LINE(I.B)-(I.31).RNDC1)»16:NEXT:F0R 

I=BT031 :LINE(B.I)-(255.I).RND(1)«16. .XOR 

:NEXT:FORI=0TO63 

2B COPY(I.B)-(I.19)TO(I«4.132) :C0PY(I»4, 

132)-STEP(2.19)T0(I»4+1 ,132):NEXT:FORI=0 

T0 19: COPY (0,151 -I) -(255. 151 -I I TO (0.2B8-I 

•4) : COPY (0.208- 1*4) -STEP (25 5.2) TO (0.2B9- 

I«4) :NEXT 

30 SETPAGE1 .1 :CLS:FORI=0TO31 :PUTSPRITEI. 

(0.216) :COLORSPRITE( I)=B:NEXT:FORI=0TO15 

:VPOKE3B72B+I , VALC&H"+MIDSC07700FFF8F7 

8770755AA55AA55AA55AA".I«2+1 .2) ) :NEXT:SO 

UND1 .5 

4 FORI=BT01 : CIRCLE (255. I»4).40B,5.,..4: 

CIRCL£(255.-20).250+I»50.5....2+I/20:NEX 

T:PAINT(B.125) ,5:PAINT(B,8) ,5 

50 PA INT (B. IBB 1,14.5 : COPY ( . B ) - ( 255 .21 1 ) 

.1 TO (B.B) ,0,TPSET:FORI=BTO255:COPY( I^B)- 

(1.211) .0TO (255- 1,0) ,1 :NEXT 

60 FORI=0TO31 :S0UND6.1 :S0UND7 . 48 : SP=RND ( 

1)«30+2:CL=RND(1 )«1 2 + 2 : SETSCROLL , . , 1 

70 SOUND8.15:FORJ=25 5TO0STEP-16:SETSCROL 

LJ, 0.1,1. -PUTSPRITEB. ( J , 1 BB-ABS ( 1 28- J 1*1 

>.CL.B:SOUNDB.255-J:NEXT:PUTSPRITE8,(0.2 

16) :SOUN08. 10:FORJ=0TO255STEPSP:SETSCROL 

LJ.0:NEXTJ.I 

8 SOUND 1 .B:S0UND7,56:SOUND8, 15:FORI=255 

TOBSTEP-1B:SETSCROLLI .,1:PUTSPRITEB.(I.1 

80+RNDI1 )»8) .15,0:SOUND0,RND(1 )«3B+48:NE 

XT:S0UND6.255:S0UND7,49:S0UND8,15:F0RI=B 

TO10:FORJ=0TOI :PUTSPRITEJ. (RND( 1 )»4 0.88+ 

RNDI1 )»4B) ,8.1 :NEXTJ,I:SOUNDB.0 



5-ft uimm-&w&m\M) 



y^zLJL-yay&t^tz^ttftii, fom 
mj.mm<z\i\5(Dazzyzz5i^=k(Dz 

to ffAMS»^XM)©^pnB, *Vz>y 




10 COLOR15.4.4:SCREEN5:SETPAGE,1 :CLS 

20 FORI=0TO8:K = 1 .57-I».19:P=( IMOD3)»80»5 

0:Q=(I*3 1*70+65 :A=COS(KI :B=SIN(K):FORJ=2 

T05:X=P-A«J»9:Y=0-B»J»9:CIRCLE(X>Y) .9- J. 

3:PAINT(X.Y).3:NEXT:LINE(P-A»12.0-B«121- 

(P,0),6:LINE-(P.Cl+4) .6 : DRAWC1E3F3H3U5" : 

NEXT 

SI SETPAGE0.0:LINE(B,141)-(255.211).12.B 

F:I=B:GOSUB50:DRAW"BM133.137- :FORI=0TO5: 

PLAY"S8M5B03C32":DRAU"C4E2C1E4" :FORJ=BTO 

500 : NEXT: DRAW C4G4C1G2" :F0RJ=BTO5B:NEXT: 

NEXT:SOUND6.15:SOUND7.7:F0RI=1TO8:G0SUB5 

0:SOUND8.I+7:FORJ=0TO99:NEXT:NEXT 

4 SOUND6.31 : SOUNDS. 16: SOUND 1 1 .0:SOUND12 

■3B:SOUND13.9:FORI=BT01 : I=-STRIG ( B ) :NEXT 

:CLS:G0T03B 

5B M=(inOD3)»80:N=(I*3)»7B:COPY(M.Nl-(M+ 

79.N+69) , 1TO( 82.71 1 .0: RETURN 



^if^XMS)©ff6pSs yzi-^^mo 

^ytz3-o<DWM{7)if^-%vm^t^\zm 
m^yts-tekzteM*., i %t?hjz\mxo 

z\ «gT-rxi7?irft. 
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i*ll?VW r FI ijyp ^7 A(7)a:?c?)*Sftl] (2S£x 29ff) &*— 'f— tfc b<nti^tz*)\ ft&/> ( £ < TS X^t:<nXimti Z t lzf£-,tz.*-TZ 



myuyz>ut 

:(DMSXZ;i!lS^-r 



EB 3(RAM 8 K) CSh/2+ r X0«^i CS32/2H 
U. ES32/2+(VRAM64KbLh)OT««T«# it 



(VRAM I 28 K iy_L) = r mr>mti 



C532+ 



= r ^wtj r F i i ^nttfWFS 



.• DEFINTA-Z:COLOR15.0.0:S 
B.I :CLS:CIRCLE(32.32) .31 .1 
32.32) , 15:CIRCLE(22.30) .7. 
2.30) . I : CIRCLE (22. 27) >4> 1S 
.7.1 ., . .7:PAINT(42.30) . 1 :C 
3.1... .2:PAINT(32.58) . 1 
28 F0RI=8T063:PSET(64+( IMO 
32) . 1 :NEXT:C0PY(64.8)-(127 
:C0PY(64.B)-< 127, 63) TO (0.0 
0.0) - (63.631 . H.BF. AN D:COL 
SETPAGE0,0:SOUND8.0:SOUNO6 
UND0.22:SOUND7.54 
?0 FOF =BT02:X=RND(1 )«192 
OPYI0, )- (63.63) . ITO(X.Y) 
=RND(- IME >+>6 + 2:FORI = 0TOR 
ORI=RTC 1STEP-1 :G0SUB4B :NEX 
»0 COLC =(14.1.1.1) :S0UND8 
5:NEXT: ETURN 



CREEN5:SETPAGE 
5. . . 1 .6:PAINT( 
1 . . . .7:PAINT(2 
:CIRCLE(42,30) 
IRCLEI32.501 .1 

D32)«2+I*32,I* 
.61 )T0(64.2) .1 
) , ,TPSET:LINE( 
0R=( 14.0.0,0 ) : 
2:S0UND1 ,0:SQ 

Y=RND(1 )«148:C 

0.TPSET:NEXT:R 

GOSUB40:NEXT:F 

:CLS:GOTO30 

I+6:FORL=0TO7 






(Dt\ £!§<[> Lfc# 



ntftl£i8b(DM£ti % 



m5Mtifrit%i>zi\%>tz?>tMmBi>\,\ 




QUi 



U. ftfTZmfilzmUZ-iT^i 



10 C0LOR15.B.5:SCREEN5:A=255:8=253:SETPA 
GE. 1 :CLS:F0RI=BT04:X=12B-I«18:Y=32+I»41 : 
CIRCLE(X,Y).9-I:PAINT(X,Y):LINE(X,Y)-(X+ 
28-I»3,Y+4):LINE-(X,Y+4):FORj=BTO1:X=60+ 
J«(128-I«28):Y=32+I»41-J«6:F0RK=BT01:CIR 
CLE(X,Y),68-I«1B,..3.15..4-K/8:NEXT:PAIN 
T(X.Y-18+I»3> 

2 NEXT:NEXT:SETPAGE.B: VDP (9) =VDP ( 910R2 : 
COPY(0,B>-(A,44)TO(B.211):VDP(24)=68:CIR 
CLE(120.4B).10:PAINT(120.48):FDRI=BTO1:X 
=6e+I«120:FORJ=0TO1:CIRCLE(X.40),60.,,3. 
15..4-J/5:NEXT:PAINT(X.2B):NEXT :t)RAW"S30 
A0BM120.50GR2H": PAINT! 120. 53) 

3 FORI=0TO191STEP4: VDP (24 1=64+ I :LINE(0, 
60+I)-(A.63+I).4.BF:LINE(B.60+I/3)-STEP( 
A,1).0.B:NEXT:Z=1:FORI=0TO15:FORJ=0TO20: 
VDP(24)=A-W:LINE(0.124-W)-STEP(A.0).-(Z= 
1 ) »4:W=W+Z: NEXT : Z=-Z :NEXT : FORI=0TO4 : COPY 
(0. I«44)-STEP(A.43> .1TO(0.16):NEXT:VDP(9 
>=VDP(9)ANDB 

»0 FOR1=0TO40:COPY(40. 176) - (A.203) . 1T0I4 
0-I.16+I):LINE(0.l24-I)-STEP(A.0).4:NEXT 

JUST FOR FUN WJ'SVh • e»8«o(iai) 

fc'BBBo^7>(M)B7^vJbr±fi, 3- 

^AV^^-^A=fctttwcllMi£tf i ornSc 



amm? ^nt^mi/b-wm? 



HAPPV FACE 



SHIT FACE 




JUST FOR FUN 



o*^- * *- T-tj] ij mt> z>. hi '] r-mzu 



10 SCREENS: COL OR 1. 15. 15:P = 3. 1415: OPEN "GR 

P:"AS#1 

2 SETPAGE0.0:CLS:CIRCLE(127, 105) .50. 11 : 

PAINT(127.105).11:CIRCLE(127.105),50:CIR 

CLE(127.105),35.,7»P/6.11»P/6:CIRCLE(115 

,85),10..,.3:PAINT(115,85):CIRCLE(139,85 

) . 10 . . . .3: PAINT) 139, 85) :PSET(87.40) :PRIN 

T#l ."HAPPY FACE" 

30 PSET(79, 170) :PRINT#1 ," JUST FOR FUN":S 



4(1 SETPAGE0. 1 :CLS:CIRCLEl 127 

PAINT! 1 27, 105), 11:CIRCLE( 127 

CLE (127, 148) .35. .P/6.5*P/6:D 

NL15NH11NG11BM136.85NR15NE11 

1 ,40) :PRINT#1 ,"SHIT FACE":PS 

RINT#1 . " J UST FOR FUN":CIRCLE 

.8, , ,2 

"0 PAINT! 127, 136) .8:CIRCLE I 

. . ,2:DRAW"BM127. 113035" 

61 A$=INPUTS<1 ) :S=1-S:SETPAG 



.105) 


,58- 


1 1 : 


■ 105) 


,50: 


CIR 


RAW" BFI1 18 


.85 


NF1 1" 


:PSET(9 


ETI79 


.170) :P 


(127. 


136) 


.23 



127. 136) .23, 1 



ES,S:GOTO60 



DANCINGfil MUMi-waKiiW 
mmuft&h yny^Ate-yyyMzim 

w-yismb-isft&o&?* 

'0 SCREEN 5:0EFINT A-Z : R=RND I -TIME ) 

20 COLOR ,1,1 

50 FOR 1=0 TO 3 

40 SET PAGE . I :CLS 

50 NEXT 

00 X=RND<1 )«255:Y=RNDf 1 )*21 1 



70 


'SET (X.Y) 


.0 














; 0R 1=0 TO 


3 














;et page i 


.1 












1 PV 


XX = RN0I1 ) 


•21 


: YY = 


RNDd )»20 






1 1 1 


C = RNDl 1 )« 


16 












1 j0 


X=X+XX-10 


:Y = 


Y + YY 


-10 








131 


IF X<0 OR 


X 


255 


or r<« 


OR Y 


'211 


THEN 


60 
















14B 


LINE -IX. 


r) 


C.BF 










ISB 


NEXT 














160 


GOTO 80 















&U£&CDg 



mAitm ■ mmm.mmmn;m 

F. I. S(13i») 



F.iszytDEttmtzmvT'iK ®m®y 

surto 

Ota, 'ITIVT-Lil. -inbm 
BTfc&CtSWiB (:<=#> 

0:SCREEN5:DEFINTB-X:DII1X(11), 
3T07:C0L0R=(I-2.I.I , I) :C0L0R= 
1 ) :COL0R=(8+I . 6 . I - 1 . I - 1 ) : NE XT 
CLS:M=-5:FORY=28TO68STEP4 0:FO 
TEP4 0:X(H)=X-20:Y(H)=Y-20:H=H 




1 COLOR0.0, 
Yd 1 ) : FORI = 
(1 + 3. 1/3. 1 . 
:SETPAGE . 1 : 
RX=20TO220S 
+ 1 

. FORI=0TO4 
•Y) . 1+1 :NEX 
I .6*1 :PAINT 
3 CIRCLEIX+ 
<M/2) .Y-4)- 
■ F0RZ=1T0. 
A/10, ,3. 14, 
1T0.6STEP-. 
Z : A=A+.4:NE 
1 CIRCLE1X, 
18, , ,3. 14, . 
' L=L-SGN(L 
0) . 1T0( 188. 
«3000:NEXT: 



CIRCLE! 
T: FORI=0 
(X+M.Y) 
M. Y) .5:P 
( X - 3 * ( M / 
55STEP-. 
Z : A=A+7A 
05:CIRCL 
XT: A=0 
Y ) ,18,1 , 
5:M=M+1 : 
-K) :COPY 
76) ,0: IF 
K=RNO( 1 ) 



Y) ,17-1 ,1 
T04:CIRCLE( 
6+1 :NEXT 
AINTIX+M, Y) 
2) ,Y-3) ,5.B 
05:CIRCLE(X 
NDA<30 :NEXT 
E ( X . Y ) . 1 8 • 1 

, 2 . 5 . . 58 : C I 
NEXTX. Y:SET 
(X(L) , Y(L ) ) 
L'KTHENFORI 
•11 :G0T06EL 



+ 1 :P 
X + M 



AINT 

Y) , 1 



(X 



Y) , 

A = 

5 -A. 

RCLE 

PAGE 

STE 

0TO 

SE6 



18,15 
:FORZ 
3. 14, 



P(40 
RN[>( ' 



Z%Bi£*M®<Zry%>Pfa<D£ftEo Z.^ 

bBtz^M^r^rsffiir', yyyx~h- 



5 10O 




1 OPE 
2T06 
:NEXT 
(A. A) 

2 NEX 
1 . "~ 
PRINT 
PY(0 
9#:DI 
«P) :S 

3 FOR 
T063 
-7)+7 
:X=31 
THENL 

4 PA I 
) . .TP 
. I J*4 
LINE! 

5 FOR 
EP(63 
»13:V 



N"GRP 
COLOR= 
:FORI= 
.27-1 
T:COLO 
PR 
#1 ."*" 
B)-(63 
MC(31 ) 
(I)=SI 
J=0TO7 
LINEI3 
:NEXT 
+C(I )« 
INE-IX 
NTIB.9 
SET:CO 
)»>64) . 
127,0) 
I=0TO7 
.63) .1 
DPI 19) 



"AS#1 :COLOR.0.8:SCRE 
(1+8. I. 7, 7) :COLOR=( I 
BT08:A=31-I*2:C0L0RI 
PAINT(A.A) 

R1:PSET(16.16) . B . TPSET : PRINT* 
INT#1." 0) I)" :DRAW"BM28.34" ■ 
:DRAU"BH28.42" : PR I NT #1 . """ :CO 
.63) TO (96. 32) :P=. 101 341 69850 2 
. S(31 ) :FORI=0TO31 :C(I)=-COS(I 
N(I«P) :NEXT:COLOR0 
:LINE(B.B)-I63.95)..BF:F0RI=B 
1. 311-11. 95). ABSI(I+J«2 AN D15I 
FORI=0TO31:A=ABS((I+JAND7)-3) 
(31-A):Y=79+S(I)«(15-A/2):IFI 
Y):NEXTELSEPSET(X,Y):NEXT 
5) :COPY(96.32)-( 1 59, 95 1 TO ( 8 . 
PY( 0,32 1-163, 95) TOI ( JAND3)*64 
1:NEXT:LINEI0,B)-(63,95),.BF: 
-1127,35) ,13 

: COPY I (IAND3)«64. (I*4)»64)-ST 
TO (96, 64) :PSET( 127.B) .1 1-1*4) 
= ( I*4)»16:NEXT:GOT05 



BANDAGE tf%%m m ® MmmiJm 

itfc&> %m\ziSLtfm*z<?>, 3— ic 




©«n(:/\->Kx-f K*M*t a* i **T< i- m*-\' 

1 COL OR3, B. 3: SCREENS :DEF IN TA-Z: OPEN "GRP: 
"AS1:C0L0R=(2.2.3,2) : COL0R= ( 3 . 7 , 4 . 3 ) :COL 

0R=(4.7,5.4):C0L0R=(6.6.6.4):SETPAGE.1:C 

LS:PAINT(0.0),4:FORI=0TO1:LINEI47+I»2,3) 

-I1B3.49-I»2),18+I,BF:NEXT:CIRCLE(75,26) 

.12.6....6:PAINT(75.26).6:F0RI=2T05BSTE.P 

3:A=A+3ANDA<3 

: F0RJ=BTO145STEP5:F0RL=8T0l:CIRCLE(JtA. 

I).L,2+L:NEXTL,J.I:F0RI=8T052STEP52:LINE 

(9, I)-! 140. I) . 5 :NEXT:CI RCLE (27.26) ,26.5. 

1 .9, 5: CI RCLE (123, 26) ,26, 5, 5, 2: PA INT (8, 8) 

. 5 :SETPAGE. 8 : COLOR = 15.7.4.3) :DRAW"BM135. 

7 0C8M95 ,60C8UH1135.78":GOSUB4 

! FORI=BT01 : LINE (29,99) -(199,154-1*2 ) ,8+ 

I. BF: LINE (38.99) -I 189. 1 54-1 »2), 14+1, 8F:N 

E XT: FOR I=0TO2: PS ET(48+I»40. 102+1.20) . ,XO 

R:PRINT#1 ."BANDAGE" : NEXT : G0SUB4 : FOR I =98T 

O40STEP-1 :C0PY (0.01-1 150.98-1) , 1TO (38. I ) 

.0.TPSET:NEXT:LINE(29,99)-( 199. 156) , 3.BF 

:G0SUB4:GOTQ5 

I FORL=0TO4000:NEXT:RETURN 

' F0RI=3T06:C0L0R= (6.6.8-1 .2) :G0SUB4:NEX 

T:G0SUB4:G0SUB4 



l&t$m])m%±mzimm.^?t7iBei]mz$,t)iT m^]\m^?tii,t r Mj<n^mrS^-_ *<n'&> fmzti&tzmz, ms, msx, Msxt MsxtRts 
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&9V99X8 



S03-3780-6570 






ffi ft: 


; -■: x47 


»li«ffi 


CS32/2+I 


VRAM 


12BK 


\t-ym 


x-fT.^1 


(1 ts 


B.400PT 


| ;i/8UB6.B0On J 



*>#, £&*, <**>#, 7PT-X/K 



fc3H«>2W-500e-a 






ur<nrufc #&»* mm 
©77 S?, sfc3AC^x.§ 



1 oiuriK &/ur7py 

#5»3*4>£7MtZ\j (PIX 
B34^-y)o-y-ArBK^x 
&U3A©S*n7c1IHt. S 
Util©35©7-7, ^urife 
©ftffltg^ »£=fe9rt:<S/u 
©^g^jitto t?U\ 53^* 
g£A/\ ^o^tJ:5L/</ 




7?ji^fj/2'7$5/a>$/Ha.b-2/3>Sim Girl 



ti-H»» "N?£-fSc:2i7*h:tf-^ 
COlSj, SifcCO£EPA<'o jSft055***/y ; ^. 




M*l AiW-3 I 'J C0-> 7 V -o'P'J ft 
#>'ib>y-A£;g\.>tii1\ftA>t:*->+l-'o 

r>7. s jg^nmw^ ft 

i^9o *5B- 2AC0fcfc*.£ 

AXMBLWOttftf^ W ■' 

i L'JOftfct #"IS, (©tt-ftto 



itlfc^V+WVACTE 



laconcjtft^bft/i^AHi, ftA/t 

Al-ftL*b*i5&-fc. *:"it5^» 
il#*o£A<Wi.So «fc < toifA.&v7 l ) 

bHt>Vt,<ntz-?tiCDtzo fflfh1%%\-\ 
-COS J T«U fcS Lfci ft^^SKW 
;fttl±*>* v bft>-^S/i'o t'iti!? 






iK-vv^ix^n- 



£U£U&A/£l' 



W>A\ 2ft*> £WC03AUt±ft 
l\ fc t ftco a- K*-';I o 7 fn> h 

?£»<, *C02Afc£a.SC0fe4-[s] 
PSUo Uo< U <■©»***♦?'' "C 
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iv3| (443-7* AtftHit:, *0 

liJsiUcOT 7 K^v^-^-^-^l-ft 
otv.*S„ iA&tt^xVf-f <A-o 
$[CO*X£^oOltt, T'fxAfc 
A^-fSCOli-tr^'J-i'fc'Jo *CO 
£>fccoi>x-f >?*"- Jr'L-sXft 
cot'* So fe-3fct>ot*^*->T, 

fc-5„ -L^^^.S<7)fe*^* v o 





II - 



X*tt* 



GAMEx^/KU* 

S03-3435-0834 

mm* 






m <t 



VRAM 



fe-7«i 



x4 



EZh/^ 



128K 



8.B00R 



?MWK^7^BJ 



* - Zx li ? 

^-A©ffiWr'U5ailAg© 
©Jffifut, ^Tr-'JT 7 *^©^ 

ffl^i^n^u a-ua£o 
< 3-5.1 t.Pur^ctB trr 

SlA M|-JTUS-5o 
-&n^62fP/cofcSSH© 

3-5^*)l^J±©5_7>^'Cfc 

fc*g37vn,s*ic r iliA7 







Zl\OftZ>7)\j*// 



7 7Jls7.it, J>f-^>9lVt 




^f-il/KiRPGo ^JSA^p;i/X«tJ1*// 
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SJ)Ur<£*u„ rtiiv7S 
rie!ti"rf>d;ei c \jT < e&i v 

— 7-fMUiIH 

7-f b-JUIBr'B:, *— VJl> 

+— T'H®SB©ffiIEtfr'$* 

JbIJDiffl3* l Ql;:97tfilS£ 



rAX-i-iiSffiT©^^) 



7-f hiHisr^Muros 

ft. ^(D^i-i — ©t^n® 

-mmmmts^--)— 

H(D zi -x-ffllftfUiDf ? t s 

^©zi-x-©$"f 7CJ: o r 
&.Jfct?>mtJ.9£to =i-x-ffl 
7-r7l::B, A. B, C©3^ 
©7-f7A' ; 350^To 
AW7~='J^-i— ESCii 

*-g:l"o *-vjb+-©±Tr 

lig£HU\ 7A-7+-£ffl 

i"tng©i5iB5A' ; ss^n^"ro 



P 75 AHfi^ilC 3— x— =fe 

c9f7=7^-7+-£}?i~ 
©ii^rgort, esc+- 

^ff-rt^3A x b^X-iL-il 

js^^ufco-rss^i^ h® 



&£x 35rQU(5'f-©C7'f7 
©Zl-x-rB, #-7JMr- 

©±Triu^©^ y-fe-ycn 

^o r *-JS#^l"Scfc5 c u 

— mm 

mmmz, *-vju*-©± 

KJbBSffl^S^JtlB'L/r, * 

>; ~ a. — h® * x 6 is u #>•§> 3 t 
ESC*-#MJ#-Bfc*ft 



# jurj. »>;>;; disk #9 



— *< k. - - 1 







116 



| ttgf< * ? »fM ? •:/ 7 SVSTEM PROGRAMMER = ±H^-(UPK) TITLE CG DESIGNER = **fflE ( 7 -f r*?v7) 
*(STING) DISK MAKER = -(tj&A 1 < ? A («) SPECIAL THANKS T07 < ? □ + V f > + < V V _ T + I JL-7 + t V '7 - 



MAIN MENU CG 



DESIGNER « Orc/TITLE BGM COMPOSER = Uj BH 
it* 



'©m^^h^^M^' 



mTZWMmz&Mmz 



r CGa>xXKjc!: r 7rv^- 

(+?i)jffla-t-B7;M 



[RET] *-£»L-T<A:'$H. 
3f-?SS* 

HUT 4 Z.7 ■& A I" 71 7'IH 
[RET] *-fr»lT<«fgl>. 



WIIClftB^USI-o St 5 . 77T- 




To ^ur. CGa>fxh? 

©d;5&HH;tftBSTo 35ttt 
^^Anfrx-ruttBUfrffl 






x5-*ytz-*//\<D3Mas 



fltitfMtt 15 1 A, t't - h T t 

To a A, 7*-V.y bigOTx 






il^^T 


7 


>C6 2 


- ■ t ; ; : ; 
1 568'Of wa±« 


S£H 


■>■.;:■' 


*tT. 




fe»i 


f X 


T-AV 


= i^[;-JtALT. 


[RET 




-*Wl. 


cxcsy. 


at-¥* 


Wd 


9* At 


, «lf!-*BI,aT, 


««?. 


~ -*. , V = 


?'< HA.bT. 


[RET 


J* 


-«ft 





tX'IZlifr<7)7T -i *TVotf 
\.*OiT4X?*>(§M9tT< x? 

tixtimtzt, t«5ico 
JrifcB&^HiSto -tut. 

7*-V-y h l£x-f X^T^ 
•J4-fcLT</;?Uo 

r File not found in ~j£l»"5 

> ■yt->?i><iiixfmfm# i ± 

X9(T>Xtli] s X i s5.hti < ^X^ Qzi 






ito ^4£#», r F5j* 
^USlT</;£u 




»3lfF*;<^4 2DD7^-v 
•y h if x -f x ? coffittat t o 
4*>\ fBSCttSf UIALtf 
-f x? (5F»t:S:^ tf '-r x ?t 
fc^T) £f*ffl<7>- i:„* L Tftfix 
-fX?£iSfflL4a*-c</:'<Hv 
1 BASICBffiT r call formatj 
tA*L l J^->*-«¥t„ 2 
tfc T £ fc > ■> -tr - •> i:*t L A <7)+ 
-%*¥*„ 3 2(7)+- «f to <1< 

tui^b^to sfa? K9 

-f 7>lft £ tfJ to 6 'BBC K t 
Si* £ft*itf-C £**)■•' 'Jo 



ca 1 1 -format 
Drive name? <A,B> 



J Ocall formattlT^ZA-, ? 



call -format 
Drive name? <A^B) 



><n\-]tz ¥=?'(-. 



1-1 side, double track 
2-2 sides, double track 



f, OKilDD. 2IJ2DD ;;X-|J2(7)+-*;¥T 



call -format 
Drive name? <A,B> 



1-1 side, double track 
2-2 sides, double track 



i 



1-1 side 

2-2 sides 

3-1 side, double track 

4-2 sides, double track 



07x-v7 nni; : .it}-«mit,'Ms-zt<nx-$itsmbs>i zm 



1 - S i no) 1 e si ded , 9 : 

2 - Uouble sided, 9 sectors 



O 2 TSCO^ -7 1- >sWZ<n& 1 'i'*^-IJ ?£§io J: T f SIC, 






TDOS1Tjt*.±*<oT^J L 
7z**, -#, *-A*W^r<7)a5» 

■ca, y -# r asa*- K ( R 
mXzwmsLX^t Ltt„ 

L* % L, D0S1 t R800^-ll* 

tL^ZtT't, *<T)tz#>s 9- 
* Ri— f—(htHs> \Z 77>f ;uc7) 



3 f-^^;*a$tc r )sa^a^jCO 
x ^ - *-*aj a -fitf^t-. x i x t 

t-t; 4-J!a x bl±*-tfR(i 
D0S2T; ^-muWiDOSi TJg 
SltJiillLiL/; (D0S2-fe 
■y l-UoT^Jt), 

ST 5t*!Cff 7 - 1 ¥X& 5 d: 7 



S«rttSfc, fc^-jfl&TX-Hlf-'-fX 
^tt*', h*>hA^ MSX2 
2 + 3.--tf-(7)fc«)C73^Jl n t<7)!5 

4-^ tt # b lc^*M 4 > x x A 
ito 4-^ttBGM^^-f (• juiii 

mx-owffls&icm l < l t * $ 
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-7^-yn^vif.yiz^D^mnti. ^^5Mi^i^%mi^^)Z'to 



r 



yvytztt-n-Mmtt 




Pal/ tl\5t>ttT-, MSXffi 
- J fflI*SA7f l J6z.r< 



fc HUUBGMB, FMgH 

i^wmm* i^t, msx 
;r nattily x^ cigcsto 



C'1991 GAINAX. 

Q199g MICRO CABIN CO. 



r y' ij > jOTSlMt fcli^l-Ao T $ S L T 

"T 5 (7) "CI* L T te , o T !K L* » * t , 3-0 

- # R T"(J *, «> s> A, t PCMT-> i"^ 
©/;'/ C'J»fch^ '3'r4 -r 7'7-'C*IVlS 





?/ »ROM#&S7?// 



il^ROMfc'J&^t L «CO> 7 

*< L * 2> jC7)7t > — a — t- 1 * 
5 J; 7 U, D0S2A x bD0S1 



jBB't', r PrincessMakerjfc 




- ■"- 


-r.'j; 


3 SI T Ea?< 


B* 


L*-?» 


DOE 


1 [-tl)t)j4.','.fiSB!»l 


^j-3- 




1=*- 

T» ■< 

r I 

Til 


■ I K L. 


tattMOH 

■iPrinv' 


r i 


Make 

t-fWL- 




Of?f?tl'i'^^vt-vtiJ)^ 



■■■■I' III 






'' hi ?r\ "/"i 






flimx 













& 



cess 

ixep 




S<n#<z>ttST-fl6*:«S-3 






mmmm*. mm—1. 
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5 f!^- r C0MINGS00NjC0zi-^-T'7' l J >**> 
?<7) r C0MIN'S.XBjt<.*T77-l'. | l'<WiT85T' r 8 5 
7JHSCG 6-1,4 1 i * ! T# * t: 



SCREEN 2 J <7) r 2 J 6 r 3jC£;lT-tz-7X'A-fcLT<t?U J inT-^it-i-x-r 




■otto $mz5>-KRmmft'\*£>o%to 



■7 7 > 9 AG AMES 

#EIS14*©ftSS£iR®o ^ 

SHOP 

Kr'iX^-Ttt'RffitiRSL/S 
Lfco =&$5Aa 7|-'JvxJU© 
S5li/3o5 iz'M^to 

;:fflfF"SrjiA,7c35dA ttftx 
Sbr<£f£iv 

3D 

fti&xyT.^©;* - .^.— #6£ 

©fFSB^Df^drgeH&dr^ 
RAMxVX^7C«$3*-S-r 

$3)<, 3©iI£ N XJbbKK^-f 



■ 7TV^ 

s^srffifflrr^&fro fit 
L/l^ffi=£l*(=*45<-y)t, 

+?5ffiS L GUtiPBrxX h 

#JD)lT-5'©fM. 

■S'-tkrzl— v-om^ 

znsr\ ftitx-r t.^7 is 
msx-dosi ir-Burn 
^Lfc„ -&©±r\ Sii^E-K 
©X t° - K # ; /3m» u i ^n ?' 
5ACA x ^or> CPU£R800 

cgz. N ffiH^E-K©5>7# 

Do«, CPUtfR800rOsk 
BASIC Ver. 1.0 (SfcBD 
OSl)£&^rxf X^T^ 



tzXT5d:5i:<ijffb&ni| 
£A' ; 355d:b5Ad:tf;Dfr03; 
Lfco 

*t, 5-*"R©^afflio 

r'SSPilxV bX MJWA 
Mx-f X^tdfSbtOisk B 
ASIC Ver.P.0©«f£)=fe, 3 

©^ris^^t^o 

tZZ\ ^frb^-Tft'Rr 
ISMSX-DOSStfjgH^S 



£.z>\z®.mbZ\,\$:to Z.CDM 
£, CPUISR800r'Disk B 
ASIC Ver.e.OC&ornS 

to 

^rai^^u^n^^Apy 

b^AroBdz/udfCf^tf-^ 
r-DCff <*!£&. CPU£Z 
8Dlcta0^^rti¥^E-K©7 
tf- Kr-K< d=5C br n^Tc 



c. 



77VS>'AGAMES, FM 
IB, AV7^-5Affl/_M-^ 

t, ?n^A£CTRL+STOP 
r-±«J, SHIFT + F4(F9)«B 

UeEst 

run "TYPe-A. xb 

tiaXfi^Sinsor, -?-© 

^5<A H<xy^7^tz7.£ 
UriaH0ffl'J\X-ii~'\=6i:DS'r i 

©/J^-n— fflzi— x— nzfffl^-5 



-<\(D*>£075 



©FM8S£ffi-r>/c7Q^A£;£ 
bt+rcStiS, CLEARX?*^ 
UWiPI^^MfS^P^^ABiE 
^CBjfFU3ett/v(MSX-MUS I 

&<tS»Utr.yt-Ur<K&U,, 

9;1l*BASIC£ft-3fc?n^ 
A^^tott/ct^t, IE?BCiSffU 
Siih,, Ul2'7SUr</c'*U 







fF#l::B$b!R&l^\ ftg 
xVX7©AV77r-^ABii 
S%brfF§g£*g}"rbrb<cfc5 

rb§„ 1 06-107^- y©*^ 

Cjf«ur^s^n^^Aiite 
f§^tlfcS^©=fc©S©I:\ 3 



nSU r OANCINGeffijtt 
ffl®©^ngB5jA' ; tt< &5 < 6 

A'«g*nb) o 3 5 b5 3 d: IS 
ttSSxV3.£©AV:7*-5A 

rist)^bGn©r\ t?o-jS*t 
tsnzi^ya^^At,mzm 

UU„ ^106^-v 




l^©v>^^^ 
BfflBGMCftof; 

xV^fflBGM^ 

©7ruyx;L/^s^ 
m/vzi\<z<tizh 

mi'tZfoDSttiK 



zmmzm 

£-m©« 

o 

bfroriC 
^lyfc 72 

sysa©fc» 



icBGMCbfc<rtr'^&u 
&i©^d:r-rA\ m%(Dmm 

11d:ffibn&URjBgtt ; fc l a< , 
g%vXxA^5rlSUd;5*d; 

©B^fe^'o^i-o iy±, *m 
m^zbtzo 



¥-3 




7^>+-K©K5L\fcf!SiJ 
/3o©CGtf#E©he^CG 
7c„ ^olSO^PB^tfe-d:^ 

^br. 5^^© r a#iiB 

lijSLG^tli#Bfx7.KlC^ 
^<g23¥/ r ZHSlIjSb 

G^^Pffxxs^^orb^ 



A!StfO«H<brSbl\o S* 

gBrfflSbfcisiip^^-^^ 
x '- ^ ©s?;$ i s tt v ^ © zi - 

x-r'oHSISI 17^-vCSS 
©tfcO, f/ibbxVXX^ffl 

Bbrtfo-ft^brgbL^ 










SBP^3^S§. S«CG 1 \Wa, 
fflltB^5g=fc©CGA' ; EbtlS 
CG=l>xXhr'J3bfSo if 
©fFSStTD^^'^bAd:©^ »£ 

^brbbr^b^So s?;S75 

;£(SI17^— b'©l35rSS^b 

rbs©r^n^n&7b' ; b^» 
brt^fto 
mm , mifwo : bt.mim\z 



CGa>x7hfflffl77-<7tf 

©±Tr'iiR x^-x^-r- 
i,fcncG^;*sbr7c=fen 

VP©=lXVKtf^7Jx*n/c© 

bd;^StflSb^?>T;'33b^§ 
ESC+-^fftt«; 77-f7 
lcti;or<§^ 

<HiilB*ISlDD^-v^b 



— aw?-*RT-(J. UK 1 — LTL>5t?C "DISK I/O ERROR'^tBTLJ^JT, WTCOi T (Ci'fcLTfe ijy&frA/tfibZ'A.jOTT'-r *?fcf£ 
4l;lJ~ J (7)#a?-xv?WilBT , CTRL , + 'ST0P'?-ttLTtAJ'r ®*LIST 3 *T-ff 3 £-»* 'l' r 3 _XCPU ( I 2 9 ) j<D r I 2 9 j£ r I 2 8 jUSI 119 






#[n]fefr/ufc/u/cofccfc5r 

A7J'+7WoB!ni:£X\fco I 



c, ui<7;^fflz:'ii;iCcfco 

tS>lUEHA«g*!!>fi*PJJIE 
(£01) Kglii^ , ffiWl ffi (A 
^S>H5lJ(®fM§)o 








to/ut*<trLMVISX-DOS 
tffrA/fcA,(C7S-Dfc&, tl\5 

r AEG J £iRfio-&b'C ;1¥^ 
SW-Jl/NTj^Jt^ROMtf 



tenA^tS^tfUbttS 
r READDQCj^bKn^- 
A© r LUNAR RESCUEj 

^HiilB*B94^-vA N b 




tsb< 



VjJSS!lflF*©fc 



fc£^ r MIDIZJt£©x 



^/cSfcMSXrMIDI^^ 
i,/urn-5A7j v J>&ncfc5r\ 



t, f/fULMqlA^^Ef Sit 



I***" 1 ~33»»3-^— arors-ssso 



^©zi-^— o ^-fMi^bt 

dfflSm. HP~113^-i>'©E 
SMSTEM OPTIONS 



DISASTERS UINDOMS O 



Dec 5010 



Funds: $1B,B00 



• i »:pL.«.»r* 
K:iriM»:i r 




Residential: *0 

C 1989/1991 Maxis software All ri| 



hts reserved/IMAGINEER Co., Ltd. 






Hff, r MSXViewjffl©"1" 
2l^y"©2|MItfK^£>ii7 



3©7.+icsfi-rni^ »«* 

nSffi¥li^^CSlMJ^c/ 
Z\(D9V yX\Zifhjifh&M[y 



S13H3J 




ft>C0PY 






sji, DOS'xroAPr'i-o 

DOS©nY>Kr'SC7J x £U 
tUAffllIA x C s tcMzyy-i 



cMxrDOsetz-vStfAO 

©±I£S, DOSR'xWAPi: 




«Jt~>i/. OrcZTo t£L i * 



AOT^-tfRfflCPLH^*.^- 
Ltfr; *TYPE-C.XB*£V^ 



7 z -f >\> &§E* - A-tHSI C -fe - 

7' L ft fc-tm'ft fc l JS to T fc - 
<7)?j;£tt * ft fc WJttttfr -^ f feo 

fc-fli-5**VU;xt>o 

ftu*g-tts W?4X9%WM 



#, ft«fjnia«tiftt't>)-t"w=t 

T ft t # 1-^(73 J: T ftXv-*"'lg 
#IV T'ft^ts *WD:L#nft^ 
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x-A-ra *?* *opm-nm. 



ir2-%m,f:* :«EPIiMSX2fclK, • ItMSX I «P8. ■.•.•IJMSX2+UB, *IJ > -# R IH7D ^7 ATT. IHOTTW:: 77 FttMSX-MUSICfFM^S) ICS«S. 
#&=l-7--7-f r-;K7)'AlBlC li, if n^'ttcO a -t-0)?<7>SL Tl>»1% -: II6-— v 



3— *-— $>-fs;i 


waigps 


F*9§iKB^ 


*-fM> 


77-fJbS 


l m 


3AS/-WI/® 


1TM!-rV 7 7(7>fi6i.> 


Ififfifflx^ 


7'u >v7./--h- 


RUN-PM 


XB 


7"u >ii7.^-ti-tnf^iis,tiiTi7a-y=7 




»(PII8) 






PMFAN 
GRDRV 
MUDRV 


COM 
COM 
COM 


A„ DOS 1 ±TBS. PMFAN imnLTb. Tt 

*-a%- tA'x-s it 










£?07-0l 




COMING SOON 


COMING SOON 


Sfff77 K7)BSS 


•>i'7ff- 


S 1 MC 1 TY 


XS5 


H8f-f^Jli:/±lsntJ f 77< ~j9f~ 


c 


(PII2-II3) 


CG 








?TT 


Vyy^L • 


7 7- > 7L. 


!lt7a7'7t 


In a forest 


FOREST 


FDB 


BASIC 7" ay 7 AT- 1 


GAMES® 


(P 35-70) 




• The lai-giri 
•TOWER OF CAN 

• 3000 mR£- & 

• block tower 
•The way to Return 
&CHASE/ 37t(i 
•ttofcfif-?.'/ 

»// 

* j. 7 ') fc7/ 

•SHOP 

• SHOP ?-*RrK 

• 3D 

•A-MAN 


1 Al Gl R 1 

TOWERCAN 

3000M 

BLOKTOWR 

W-RETURN 

CHASE 

HATTAOS 

SA 1 

KYUR 1 

KANJ 1 

SHOP 

SHOP-TR 

THREE-D 

THREE-D 

A-MAN 


FDB 
FD6 
FDB 
FDB 
FDB 
FDB 
FDB 
FDB 
FDB 
FDB 
FDB 
FDB 
FDB 
XB 

FDB 


THREE-D.FD6 it '1 h At |}flf< 7 7 (7) i 
J®.i:fc»i7)7"P7'7A 


Z>j>>&k>- 


*— A-fc'*-*— X 


«K7P77i 


•SCREEN 5 BimSIBfiSIBxf'-i- 7 


SAMPLE 


SB6 


BASIC7P 7'7ATT 


y->yn/ja?5k® 


BUS (P 48) 












FMS^IIA 


FMS*ffi 


H7n«i 


FJ1fi8.«~FOR~ 


FOE 


FMB 


BASIC 7" □?• 7 ATT 




(P 72-75) 




ERun For — 
23COSMIC RHAPSODY 

H Heart of Fire 
E PALA.CE OF— 


RUNFOR- 

RHAPSODY 

UTYU-SEN 

FF2F IGHT 

HERA 

DRACULA 

PALACEOF 


FMB 
FMB 
FMB 
FM6 
FMB 
FMB 
FMB 




AV?*— 5A® 


AK7I-7A 


W7'P7'7i 


■$%<n i* r ^5^m 


AV-START 




AV-JUNE.AV6 W!/IBTt»B707'7l.T- 




(P 106-107) 




SJESBH fcHli r *:l>* J 


AV-JUNE 


AV6 


T„ BASIC*'F,efcT4*-&IJ, AV-JUNE.AV6 








Sftffifl 


OPEN-GRP 


AVB 


£OPEN-GRP.AV6<73 2*fc'l7Tft2< JT 


l5l5«gfflCG=l>x 


lilltSrSOTCGP > 


fflKCG 


«2g»n 


RUN-CG 


XB 


CG' 6 6 - . LZH t CG' 6 - 2 . LZH <k a K - 


xs® 


■7-^ r- (P 100-105) 




r n*»±ifj 


CG'OB-1 


LZH 


L, W;*L, 5llTT6t*ro7'n^7iTt. 








r :F>7A+FAtS 1 IS 3ACO»i£ 
r WINNING RUNj 


CG'OB-e 


LZH 


(f)L(B, 117'*— S»tCK <*;*(.< 




















-r 7 7 f «n 














r ->W ^>7'j 














r s: ttjfAj 














C Gi*JS<7>j£+;t7 - 7 7-r v? 








AV»35B® 


"Va^B 


r AGE J irr'<-va > 


PMext Ver.2.22 


PMEXT22£ 


COM 


< hi < £94-99^- v^rJK KSO 




( P94~99) 


* 


AGE Ver.1.02 

NT Ver.0.2 

READDOC 

LUNAR RESCUE Ver.0.8 


AEG102 
NTS 

READDOC 
LUNAR 


PMA 
PMA 
BAS 
PMA 




7-A+?B© 


-7--A+?m(P22) 


t J 77-i:i5+? 
*H:'5CG 




KABUK 1 


XS7 


ttHf-f 7 7ffli;)±)8STifc?'7 7-f 7 }f- 
7T-T 




srsu^Q© 


#»f -f 7?<7Mfl.' 
7J(PI20) 


7-fX 




ATE-Q'OB 


XP7 


ftSff 7?ffli:lBJh/:{'77< "j9*r- 
7TT 




B:© 




«»«ie 




B-COLON 


C 


ft*f*-< 7? fix* 7 F7 7--OLTT 






Trv^® 


l<n%fA(P45) 


IS#S«7P7'7A 


•3t¥i;i4X¥ 


MOJ 1 MOJ 1 


FSB 


BASIC7'P7"7ATT 


+¥*(P24) 


HSSDOT-te-T'r 


SLG**i^»ifflx-7 


RUN-CRU 


XB 


HS;SIISLG*7ji£«x7 Fffl#ft7'-7fp'fa 






-9 




SANGOKU2 


LZH 


ffl7"P^7A£. f«)f±«lf-?Tt, S«T 
&***<* u ST.(ftL( BII7'*— i>*OS 

<fc'?l> 


MSX-DOS® 


ttSSx-f 7?r7)«l.> 


MSX-DOS 1 , 2 r7)S 


MSX-DOS 1 


MSXDOS 


SYS 


MSX 2 2 + HOTMSX-DOS 1 -tz 7 F t. ti b 




7f(PI20) 


*-tr-y F 




COMMAND 


COM 


C?-* Rfflr7)MSX-DOS2 * ■■/ FA-'AtTU 








MSX-DOS 2 


MSXDOSe 
COMMANDS 


SYS 
COM 


«T, ?-*Rlt*itlCDOS2 T. ifftUfl-IJ 

dos i ■r-g»LTi.>i-r 



*ffi« ; fl: r LZHj(7)o< femlJ, 7U-7i7'OT r LHA.iM*TT)±«l-fcfc<7)TT. ttfc. COT7-;HJg*lS**? A.(7)WJff L tzT-t> -f /< 
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